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Sundog Systems proudly presents Ihe first 51 2K arcade game 
available tor your CoCo till It you don't have 512K. you will 
want to get It Just lor this gamel The evil Slnlstaars have In- 
vaded the galaxy and It tails to you to destroy them. These 
(lends will attempt to hold you with a constant barrage ol 
drone ships while they muster their strength, and eventually 
find and obliterate you. Your mission Is to mine the myriad 
asteroids In search ol the precious ore which can be refined 
Into sinlbombs, your only weapon against the Slnlstaars. 
Many surprises await as you advance through the increasing- 
ly difficult stages Experience the fast-paced action of 512K 
packed with spectacular graphics, sound effects, and voices! 
Dozens of stages will keep you 
coming back for more. Req. 
512KCoCo Ml and disk drive. 
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Years alter the mysterious hero called the Paladin disap- 
peared, loathsome creatures, spawned from the bowels of the 
planet, have overrun the land ot Tarlnth and captured the 
king. The situation is grave, for without the king's influence, 
the three nations will not uniio against the growing evil. Only 
one purs ot heart can master the live magics and thereby 
tultlll the Paladin's legacy and save the realm. Adventure into 
this vast land of fantasy, Interract with Its inhabitants, explore 
the ruinous mines, and do battle with supernatural forces Ex- 
perience Ihe magic ol the quest in this fast-paced role-playing 
adventure, all In the familiar quick scrolling, bird's eye play 
format. You will love the feeling of playing an action game 
with great graphics, animation, and sound effects, but all the 
while solving one ol the most Involved adventures yet. Tarintti 
awaits Its savior! Available for 
all CoCo models! Req. 64K ^^/, I 
disk drive. Br *' !*- 



Visa. Mastercard. Check, Money Order, and COO 

iieasej accepted All foreign 
must db senl in US currency Money Orders li 

for sliippintj In USA and Canada 
Foreign $3.00 extra lor COD orders. PA residents 

ft sales lax Dealer inquiries welcome 
Authors we're looking lor new software! 



Something Is killing oil the members ol the legendary order ol 
Kyum-Gai. In desperation, its leaders have called upon the 
powers ol the life stone to resurrect you, their greatest hero: 
the NINJA GAI-DAN. Now, you must find and destroy the evil 
torces behind this dark plot. Use a multitude of martial arts 
moves to deleat your enemies, obtain treasure and weapons, 
and evade obstacles. Kyum-Gai: to be Nlnla uses the most 
detailed 320x200 resolution, 16 color graphics, the highest 
quality digital sound effects, and spectacular animation to 
bring you the greatest martial arts game your CoCo ill has 
ever seen. Created by the author of Warrior King, this Incredi- 
ble arcade game Is a definite must (or your CoCo III software 
collection. Join the ranks of the Kyum-Gai and find out what It 
means to be Nin|a! Req. 128K 
CoCo III, disk drive, and 
joy slick (2- button |oy slick 
supported). 



SoundTrax Is an unprecedented sound sequencing system for 
the CoCo III. It requires no extra hardware (I.e. mldl 
keyboards, cables, etc.). All ol it Is contained in your CoCo. 
This amazing program will read in a digitized sound and play 
back all of the notes In the octave In which It was recorded. 
And It's POLYPHONIC! You can sequence up to tour voices at 
one time, and not only the same sound! With as many voices 
as can be held In your memory, depending on the song, you 
can create a score of up to THREE DAYS in length using 
drums, horns, strings, even your own voice! And you can 
play them all together! Using the built-in windowing polnt- 
and-cllck editor, you can cut, paste, even synchronize the 
score to |ust the way you like it. Use the pre-sampled sounds 
from the disk Included, or make your own by Importing them 
from some of the more popular digitizers available. Also, 
CALL for the availability of extra sound sample disks! Get it 
today; you won't believe your 
ears! Req. 128K CoCo III, 
mouse/ joystick, and disk 
drive. 
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128K CoC 
Hint Shee 



Hall of the King I, II or III 
$29.95 each 

Hall ol the King Trilogy 
$74.95 
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Champion 

$19.95 







Kung-Fu Dude 

64K CoCo. $24.95 



Dragon Blade White Fire ol Eternity 

$19.95 $19.95. 



•All require 64K CoCo. 





cirjpoa 



From Computer Plus to YOU 
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Tandy 1400 FD $1219 

Tandy 102 32K $349* 

Tandy WP-2 $259* 
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Color Computer 3 
W/128K Ext. Basic $115' 






Tandy 1000 SL $529* 
Tandy 1000 TL/2 $819* 



DMP-132 $199* 







Color Computer Disk Drive 
Drive $179* Drive 1 $149 



BIG SAVINGS ON A FULL 

COMPUTERS 

Tandy 1000 HX 1 Drive 256K 349,00" 

Tandy 1000TX1 Drive 640K 719.00" 

Tandy 3000 NL 1 Drive 512K 1279.00 

Tandy 4000 1 Drive 1 Meg. Ram 2089.00 
Tandy 5000 MC 2 Meg. Ram 3799.00 
PRINTERS 

Radio Shack DMP-1 07 1 20 CPS 21 9.00 
Radio Shack DMP-132 120 CPS 199.00* 
Radio Shack DMP-1 33 160 CPS 239.00" 
Radio Shack DWP-230 Daisy Wheel339.00 
Tandy LP-1000 Laser Printer 1899.00 

Star Mlcronics NX-1000 144 CPS 199.00 
Star Mlcronics NX-1000 Rainbow 269.00 
Panasonic KXP 1180 192 CPS 219.00* 
Panasonic KXP 1 191 240 CPS 259.00" 
Panasonic KXP 1124 192 CPS 369.00" 
Okldata320 300 CPS 369.00 

Okidata390270CPS24WlreHd 515.00 
NEC Pinwriter P-2200 1 70 CPS 399.00 

MODEMS 

Radio Shack DCM-6 29.95* 

Radio Shack DCM-7 85.00 

Practical Peripheral 2400 Baud 229.00 
Practical Peripheral 1200 Baud 149.00 



COMPLEMENT OF RADIO SHACK COMPUTER PRODUCTS 



COLOR COMPUTER MISC. 

Radio Shack Drive Controller 99.00 

Extended Basic Rom Kit (28 pin) 14.95 
64K Ram Upgrade Kit (2 or 8 chip) 39.00 
Radio Shack Deluxe Keyboard Kit 24.95 
HI-RES Joystick Interlace 8.95 

Color Computer Deluxe Mouse 44.00 
MultiPakPalChipforCOC0 3 14.95 
COCO 3 Service Manual 29.95 

Serial to Parallel Converter 59.95 

Radio Shack Deluxe Joystick 26.95 

Magnavox 8515 RGB Monitor 299.00 
Magnavox Green or Amber Monitor99.00 
Radio Shack CM-8 RGB Monitor 210.00" 
Radio Shack VM-4 Green Monitor 99.00 
PBJ OK COCO 3 Upgrade Board 24.95 
PBJ 51 2K COCO 3 Upgrade 1 39.00 

Tandy OK COCO 3 Upgrade Board 29.95 
Tandy 51 2K COCO 3 Upgrade 1 49.00 
COLOR COMPUTER SOFTWARE 

TAPE DISK 
The Wild West (CoCo3) 25.95 

Worlds Ot Flight 34.9534.95 

Mustang P-51 Flight Slmul. 34.95 34.95 
Flight 16 Flight Simul. 34.9534.95 



COCO Util II by Mark Data 39.95 

COCO Max III by Colorware 79.95 

Max 1 by Colorware 79.95 

AutoTerm by PXE Computing 29.95 39.95 
TW-80 by Spectrum (CoCo3) 39.95 

Telewriter 64 49.9559.95 

Telewriter 128 79.95 

Elite Word 80 79.95 

Elite Calc 3.0 69.95 

CoCo3512KSuperRamDlsk 19.95 

Home Publisher by Tandy (CoCo3) 35.95 
Sub Battle Sim. by Epyx (CoCo3) 26.95 
Thexder by Sierra (CoCo3) 22.45 

Kings Quest III by Sierra (CoCo3) 31 .45 
Flight Sim.il by SubLogic (CoCo3) 31.45 
OS-9 Level II by Tandy 71.95 

OS-9 Development System 89.95 

Multi-View by Tandy 44.95 

VIP Writer (disk only) 69.95 

VIP Integrated Library (disk) 149.95 

Prices are subject to change without notice. 
Please call lor shipping charges. Prices in our re- 
tail store may be higher. Send lor complete 
catalog 
"Sale prices through 1/10/90 



CALL TOLL FREE 
1-800-343-8124 

• LOWEST POSSIBLE PRICES 

• BEST POSSIBLE WARRANTY 

• KNOWLEDGEABLE SALES STAFF 

• TIMELY DELIVERY 

• SHOPPING CONVENIENCE 
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P.O. Box 1094 
480 King Street 
Littleton, MA 01460 



SINCE 1973 



IN MASSACHUSETTS CALL (508) 486-31 93 



TRS-80 is a registered trademark ot Tandy Corp. 
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Features 
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Save 

the Variables 

Michael Moore 
Chaining basic programs 



& 



26 

Harness . 

Those Keys ^ 

Mike Dalene 

Take control of your keyboard by 

giving new meaning to special keys 




46 

Do You & 

Have the Time? 

Jonathan Saksa 

It's time to get organized — let this 

calendar give you a hand 

60 

Beginner's 
Hints and Tips 

Staff 

Help is on the way 

72 

One Tile ^ 

at a Time 

Nick Bradbury 
A last-paced arcade game tor fast- 
paced thinkers 

76 *> 

Mandelbrot Bug ™ 

Marty and Jeremy Spiller 
Discovering a new world 
with the CoCo 3 Microscope 



82 

Improving the 
Scheme of Screens 

Shane Messer 

Create and customize icons lor use 

with animation 

106 

Innovation ^ 

Along the Border 

Scott Thomas 

Creating personalized stationery 




110 

One Label Q 

or Two? 

Kevin Deneen 

A simple label-maker progam 

112 

What Goes Up. . . ^ 

Hector F. Cuadra 

A game lor physics students 
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Novices Niche 
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What Day? ^ 

Rebecca Kastack 

31 * 

Disk Copy Utility " 

William F. Medlock 
32 

Box Menu ^ 

Bill Bernico 

32 

Moonscape ^ 
Jim Forster 

34 

The Base Converter 

James Stakelin 

36 

Searching ^f 

for a Rainbow 

Carlos A. Garcia 

37 

The Memo Maker ^ 

Darrin Seats 

37 

Gopher Smash ^ 

Thomas Wong 

38 

Quickgrass ™ 

Joseph Pendall 
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Scoreboard 
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Scoreboard Pointers 
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Submitting Material 
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Subscription Info 
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Columns 



87 

BASIC Training ^ 

Joseph Kolar 

In communion with the CoCo 

56 

Breakpoint fy 

Greg Law 

Don't spend all day looking for a 

certain disk 

20 

CoCo Consultations 

Marty Goodman 
The disk system that lied 



The cassette tape/disk sym- 
bols beside features and col- 
umns indicate that the program list- 
ings with those articles are on this 
month's RAINBOW ON TAPE and 
RAINBOW ON DISK. Those with only 
the disk symbol are not available on 
RAINBOW ON TAPE. 



117 

KISSable OS-9 

Dale Puckett 
Talking about modularity 

10 

Print #-2 

Lonnie Falk 
Editor's notes 

40 

Turn of the Screw 

Tony DiStefano 
A new toy for the CoCo 

42 

Wishing Well ^ 

Fred B. Scerbo 

A math program with addition and 

subtraction 

124 

Wrapping the RAINBOW 

Cray Augsburg 
From reader to writer 

"Barden's Buffer" and "Education 
Notes" will return next month. 



Product Reviews 



Cycle Jump/JT. Rawlinson Software 
Data Form lll/E.Z Friendly Software _ 
Eagle Keyboard/Arizona Small 
Computer Peripherals 



File System Repack/Burke & Burke 

Phonics Fun/W.B.D. Software 

Space Pac/Microcom Software 

Studio Works/Ob//'gi/e Triad 

Super Sound/Supersoft, Inc. 



Treasury Packs/Mcrocom Software 



104 
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Correction 

An error in production resulted in on 
incorrect photo placement on Page 76 of 
the December 1989 issue. The photo ap- 
pearing on that page was o/UltiMuse 3. 
not Lyra as the text implies. The correct 
photo appears below. We apologize to both 
Kulaford Research and Second City Soft- 
ware for this mistake. 




The Old Kid on the Block 

Editor: 

I was really impressed with my first 
issue of THE rainbow a couple of years 
ago. It has been more than a year since I 
bought your magazine so I picked one up at 
the bookstore. Reading through it, 1 was a 
little disappointed that it contains so little 
about the CoCo 2. I realize the CoCo 3 is 
the new kid on the block, but there are still 
a lot of CoCo 2 lovers out here. 

I hope THE rainbow remembers not 
everyone can afford to run out and buy the 
latest version of a good thing. I really enjoy 
your magazine, and I realize it's hard to 
please everyone, but keep up the good work 
and don't forget the CoCo 2s. 

Linda Sigite 
Alton. Illinois 

Help a Possibly Distant Relative 

Editor: 

I'm looking for a program tor the CoCo 
2 that I can use to create a family tree. I've 
seen one for the CoCo 3 but nothing for the 
CoCo 2. If someone has such a program, 
please contact me. 

James L. Mailman 

7924 48th Ave. 

Kenosha, WI 53142 

Inspiring Authors 

Editor: 

When are we going to see some more 
additions to the Rainbow Bookshelf? I would 



like to see something along the lines of 
"The Completely Official rainbow Be- 
ginner's Tour Guide Through OS-9 Level 
2 Assembly Language Programming Tech- 
niques, Procedures, Practices and Meth- 
ods." The book would help those of us who 
know a little about assembly language to 
gain the skills we need forturning our ideas 
into completed programs that run in the 
OS-9 environment. This can only be good 
for the CoCo community and consequently 
for THE RAINBOW. 

Robert W. Kemper 
llinesville. Georgia 

Blaster Alteration 

Editor: 

Congratulations on your Blaster pro- 
gram. 1 was writing a similar one, but I 
don't need to any more — thanks. 

Since I am using the new Extended 
ADOS-3, which starts in lowercase, it was 
necessary to place a POKE 282 . 255 : at the 
start of Line 20. The 34 in lines 8 10 and 830 
was changed to 39 to permit access to 40- 
track disks. 

Line 850 had to be changed because the 
sectors above ES and those below SS are 
never accessed in the multiple-track search. 
Lines 842, 844 and 846 are also added: 

842 L0CATE5.22:PRINT"S E A R C H 

1 N G";:F0RTR-ST TOET 
844 IFTR<ET THEN NS-18 ELSE NS-E 
S 

846 IFTR>ST THEN MS-1 ELSE MS-SS 
850 F0RSC-MST0NS:G0SUB40:G0SUB28 
0:PA-INSTR(1.A$.WD$):PB-INSTR(1. 
B$,WD$):PC-0:IF ( LEN(WD$)-2)AN0( 
RIGHT$(A$.1)-LEFT$(WD$.D) ANDCL 
EFT$(B$.1)-RIGHT$(WD$.1))THENPC- 
1 

I think the above alterations will help other 
users. 

Eduardo S. Prado. Jr. 
Sao Paulo. Brazil 

A Thousand Words Without a Picture 

Editor: 

Will someone please help me? I have a 
Color Computer 3, FD-502 disk drive, DMP- 
132 printer and DeskMate 3. 

DeskMate 3 has a Paint application as 
well as a Print command for any graphics 
you create with it, and the DMP- 1 32 printer 
has graphics capabilities. The problem is, 
the printer won't print graphics. 



I consulted the folks at my local Radio 
Shack several times, and they suggested 
that I did not have the DIP switches set in 
the correct position. They said that 1 must 
have had Switch 1-8 in the Word Process- 
ing mode instead of the Data Processing 
mode. Life should be so easy. 

Most recently I was able to take my 
printer to Radio Shack so the manager 
could hook it up to his CoCo 3 and disk 
drive. I had the same results, and it did no 
better when he connected a new DMP- 1 33 
and tried to print graphics from the Desk- 
Mate Paint application on it. All I get on 
either printer are continuous lines of dot 
matrix. 

Robert Norman 

640 Greenbriar Drive 

Harrodslmrg. KY 40330 

Hard Drives Versus Floppies 
Editor: 

I recently acquired a MiniScribe Model 
3425 25-Meg hard drive. This drive was 
originally configured in a TallGrass case 
with a TallGrass controller and used on an 
IBM PC. If the controller was stripped off 
and a CoCo controller (such as the type 
used with the Seagate drives) purchased, 
could this drive be made to work with a 
64K CoCo I or 2 with OS-9? 

Can you give all of us hard drive neo- 
phytes a clear and detailed explanation of 
how a hard drive works and the differences 
and similarities between hard drives and 
floppies? 

Keith Abbott 
Urbana. Illinois 

See the March 1989 issue (Page 44) for 
a comparative look at hard drive systems 
for the CoCo. 

Tazman Fix 
Editor: 

Two of our customers recently reported 
experiencing problems while attempting to 
load our newest game, Tazman. After typ- 
ing in TAZMAN to load the game, they both 
received Error 214, No Permission. After 
investigation, it was discovered that the 
cause of the error was a missing window 
server. If windows are not opened after 
booting OS-9. an Error 2 14 occurs. Other- 
wise the game loads and runs perfectly. 

Only those copies of Tazman sold dur- 
ing the Somerset RAINBOWfest last month 
seem to be affected. We have already be- 
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Microcom Wishes its Customers^ 
a Mem/ Christmas! Vl 



jftfif- Clll Pages 



by Walter Bayer 

The ultimate desktop publishing program for the CoCo 3. Allows COMPLETE CONTROL of all the elements in thel 
page! Features pull-down menus, icons & dialog boxes, drawing tools (create boxes, polygons, rays, circles, elipses, brushl 
shapes), cut, copy, stamp, paste, zoom, flip horizontal/vertical, enlarge/reduce, rotate at 45 &90 degrees, stretch, undo, im-l 
port any ASCII text (even CoCo Max 1/2 Creations & Fonts!), create 2/3 columns, change fonts/invert text & page preview.! 
Includes 1 4 fonts & 60 pieces of clip art. No other desktop program comes even close. Req. CoCo 3, RGB/ Monochrome! 
Monitor, Min 1 drive, Tandy Hi-Res Interface, Joystick/mouse & DMP 105/106 or Epson/Gemini & Compatible Printer. Only| 
[$49.95. w / Hires Inteface Only $59.95. w/ Hires Interface & Mouse: $79.95 
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Color Schematic Designer Ver 2.0 
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The best Circuit Designer for the CoCo 3. Pull Down Menus, hi-resolution symbol sets, Keyboard / Mouse / Joystick (with 
I proportional cursor speed system), lightning fast multiple UNDOs, Symbol Add / Modify / Rotate/Line/Box Draw, Hi-res Fonts, 

workspace of 640 x 1000 pixels, 3 layers, font styles (fancy, italic, block, computer, etc). Supports DMP/ EPSON / GEMINI 
| & compatible printers. Supports near laser quality printouts on almost all EPSON Compatibles! Only $39.95. CSD 1.1 /| 

1.2 owners can upgrade to version 2.0 by sending $10 with proof of purchase. (See Review in September 1989 Rainbow) 




MUSIC 
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Musica II: Best Music Composition program 
I for the CoCo 1 ,2 & 3. Disk Only $29.95 

Lyra: MIDI Based Music Composition 

program for the CoCo 1,2 & 3. Disk Only 

$49.95 

The Lyra Companion (Book): $9.95 
I CoCo Midi 3 Hardware: Sophisticated 

MIDI sequencer/ recorder. Only $99.95 
[CoCo Midi 3 Software: $59.95 



lax 107$39.95 

Spelling Checker for Max 10:$29.95 
Max 10 Fonts (36 fonts): $29.95 
CoCo Max III: $49.95 
CoCo Max III Fonts (95 fonts): $49.95 
Max Edit (Font Editor): $19.95 
NX1000 Rainbow Driver: $19.95 
CGP 220 Driver: $19.95 
CoCo Max II: $69.95 
CoCo Max I (Tape): $59.95 
MAXPATCH:Run CoCo Max 2 on CoCo 3i 

619.95 




VIP CALC III 

Best Spreadsheet for CoCo 3. Only| 
$69.95 

VIP DATABASE III 

The Best Database for the CoCo 3. | 
Only $69.95 



File System Repack 

A must utility for every OS9 owner. 
Unfragments your hard/floppy disk to 
speed up disk operation & reduce | 
wear on drive heads. Only $29.95 



CEBBS 



By Kevin Berner 

Best BBS for CoCo 3. Features Xmodem 
Up/Downloading, unlimited menus, login, 
message base, built-in clock/calendar, ex- 
ecution of external programs. Sysop has 
full control of user's access to menus, time 
on system & remote system access. Full 
Error Trapping. Even HYPERIO Com- 
patible. Req. $59.95. Intro. Special. Only 
$49.95. Min Req. CoCo 3, 1 Drive, & RS232 
Pack. 



DOS 

I ADOS 3: Advanced 
Operating System for the 
CoCo 3. Epromable. 
Only $34.95 ADOS 
(CoCo 1,2): $27.95(Ex- 
tended ADOS Might Be Avail by 
the time you read this!) 

RGB DOS: Supports 
double sided drives, up 
to 2 hard drives & more. 
Epromable. Only $29.95 



CoCo Util II 

Transfer Programs between CoCo & IBM. Will I 

(Transfer Basic Programs & ASCII Files. Req 
DOS 3.2 or lower. Req. IBM Compatible with 2 j 
| drives. Only $39.95 

Xenocopy 

I An amazingly versatile program that allows I 

you to format/ duplicate / read/write disks be- 
tween 300 different computers. For ex. you| 
could transfer files between CoCo, IBM, NEC, j 
Model 3, etc. Requires an IBM Compatible | 
with 2 drives. Only $79.95 



ester, NY 14618. 
fies(Pgs7-l7). 



Jhlf MICROCOM SOFTWARE 2900 

To Order and info on free gift: Refer to Page 17 of our _ 

Credit Card Toll Free Orderline 1-800-654-5244 

(9AM - 8PM 7 DAYS/WEEK) 

Tech. Info (Between 4-8pm), Order Status. Info: 716-333-8830. Fax: 716-383-0026. 
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gun contacting every customer who 
purchased Tazman to alert them to this 
problem and lo supply them with the fix. 

In order to get Tazman running, do the 
following: While your system disk is still 
in Drive 0. type INIZ W6. Then put in your 
Tazman disk and follow the instructions in 
the manual from Step 5. When distributing 
disks at RAlNBOWfest. Eversoft Games 
did not take into account the people who 
start their systems up without any windows 
initialized. We apologize for this problem 
and will supply an updated disk free of 
charge for anyone who mails the master 
disk back to us. 

1 can be contacted on Delphi (usemame 
JEMGE), or by writing directly to Eversoft 
Games. Ltd. 

Judith A. Emge 

Eversoft Games, Ltd. 

P.O. Box 3354 

Arlington, WA 98223 



Michigan Squinter 

Editor: 

Each month I eagerly await my precious 
copy of THE rainbow. When my Novem- 
ber issue arrived, the first thing that caught 
my eye was a game of checkers for the 
CoCo 3. but the listing's type size had been 
reduced so much that it is impractical to 
type in. 

Although 1 noticed in the ReaderSurvey 
a few lines for comments, I didn*t see any 
questions pertaining to the change in type 
size. Type size is very important in listings. 
The smaller the type, the greater the risk of 
q errors, and the less interest one has in 
typing in the listing. 1 only hope enough 
readers write in and complain to change 
your mind. 

Harold R. Burchett 
LeRoy, Michigan 

The fact is, we simply cannot maintain 
the current volume of material with wider 
listings. A wide listing 90 inches in length 
takes up four and one-half magazine pages, 
while a narrower listing of the same length 
takes up only three. Still, we always keep an 
open mind where reader opinions are 
concerned. Thank you for sharing yours. 

Looking for Improvements 

Editor: 

1 am using a CoCo 3 with VIP Desktop. 
It's a great program, but I need more. Has 
anyone written a program to enhance the 
database program? Some of the improve- 
ments I'm looking for include being able to 
use a RAM disk with the program for faster 
access, run databases larger than the cur- 
rent 550 records (select drive capacity), 
and change and add fields to the database. 



If someone can help in any of these 
areas, I would appreciate it. 

Todd Con key 

10903 83rd Ave. 

Delta, BC V4C 2E9 

Canada 

Unshaky Bob 

Editor: 

After reading the software review of 
Notes in the July 1989 issue of THE RAIN- 
BOW, I sent for a copy of the program from 
Robert Pori. The program I received loaded 
easily and the documentation made editing 
a song simple. When I tried to print it out on 
my printer, it wouldn't run. 

A letter to Bob Pori brought a quick, 
responsive phone call in which we dis- 
cussed possible corrections. These sugges- 
tions got the printout working, but there 
remained one small bug. I contacted Pori 
again, and — ■ in spite of his house being 
badly damaged during the recent Califor- 
nia earthquake — he managed to correct 
the bug and to send me a revised program 
on disk. 

If anyone is interested in printing out 
music scores on a computer, I recommend 
Notes and the services of Bob Pori. 

Deane Milliken 
Spartanburg, South Carolina 

Inserting a Caret 

Editor: 

In your recent One-Liners for the Color 
Computer, I noticed the use of the caret ( A ) 
symbol as a type-in requirement. Neither 
my Color Computer 2 keyboard nor my 
Brother portable has that symbol, and I am 
not sure what key to use. 

L.J. Busching 
Port Hueneme. California 

To generate the caret, press the up- 
arrow key. You will see an up-arrow on 
your screen, which is the CoCo's represen- 
tation of the caret character. 

Mv Son Needs Games 

Editor: 

I would like to express my concern, 
about the future of RAINBOW magazine. 
You have given your readers constant af- 
firmation that the CoCo and therefore THE 
RAINBOW continue to thrive, but when I 
look at the dwindling size of my magazine, 
I can't help but wonder. I would like to see 
more games published. Personally I am 
impressed by the amount of assistance 
provided to CoCoers by your regular and 
guesl columnists, but it is the games that 
keep my son interested in learning about 
computers. 

Now I would like to praise Cer-Comp's 
TextPro IV. I purchased the program and 



when it arrived in the mail (three days after 
I phoned in my order), the disk did not 
function properly. I called Cer-Comp and 
Bill Vergona patiently went over the load- 
ing and operating procedures with me to 
make sure the problem was not from my 
end. He finally suggested I send the disk 
back to him to be checked out. The disk was 
faulty and was replaced immediately. All 
of this took less than a week. After using the 
program for several months, I find that it is 
all that I could have wanted. My thanks to 
Mr. Vergona for an excellent program that 
is worth the investment. 

Andrea Lee Stevens 
Suisun City, California 

Preparing for a Purchase 

Editor: 

I am going to buy a Tandy Color Com- 
puter 3 in the near future. For my own 
purposes I do not need a full-size printer. 
The least expensive Tandy printer is the 
DMP-107. which lists for $279.95 — more 
than the Color 3. 

I contacted Tandy in Texas, and the 
representative said your magazine had in- 
formation on less expensive printers for the 
Color Computer 3. 

Could you please help me out? I need 
something small, such as the TP- 1 printer. 

Ray Roberts 
New York 

Several of our advertisers offer feature- 
packed printers in a price range you may 
find more suitable. 



THE RAINBOW welcomes let- 
ters to the editor. Mail should be 
addressed to: Letters to Rainbow, 
The Falsoft Building, P.O. Box 385, 
Prospect.KY400S9.Letter.sshould 
include the writer's full name and 
address. Letters may be edited for 
purposes of clarity or to conserve 
space. 

Letters to the editor may also 
be sent to us through our Delphi 
CoCo S1G. From the CoCo SIG> 
prompt, type RA1 to take you into 
the Rainbow Magazine Services 
area of the SIG. At the R AINBOW> 
prompt, type LET to teach the 
LETTERS> prompt and then se- 
lect Letters for Publication. Be sure 
to include your complete name and 
address. 
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..Jus! think of any word processing feature.' 
chances are Word Power has iL.. packs a lot oil 
features.. .excellent word processor..." Word 
Proc. Comparison-April I9S9 Rainbow; Pg26. 




*: UM «i 



SPEED 



J?**. Blazing Fast! Runs 
g al 2 Mhz and uses 
the standard text screens for 
lightning fast execution. 




Word Power 3.3 

The Best Just Got Better! 



...friendly... a ma zing execution 
speed. ..much easier to use than VlPi 
software & 2 other systems I've 
tried. ..very user friendly... highest among 
word-processors"-Rainbow Oct SS Rev. 



MEMORY 

Word Power 3.3 allows 72K of] 
workspace on a 128K CoCo and 
460K on a 512K CoCo. More memory 
than any other word processor. Period. 



EDITING 

Powerful full-screen editor w/| 
word-wrap. 4-way cursor,scrol- 
ling; Line Positioning; Block 
Commands; Search, Replace; 
OOPs recall during delete, adjustable key- 
repeat, key-click, typeahead. Tabs, Word-Count 
and much more! . Built-in extensive HELP 
screen can be accessed anytime during edit. 





SPOOLER 

Prim and Edit docu- 
ments at the same time! 






DISPLAY 



Choice of 40 or 80 
columns with your 
choice of colors. Can 
be used with RGB/ 
Composite/Monochrome Monitors and 
TV. Pull down menus, plain english 
prompts, on-screen underlining and page 
break display make it a breeze to use! 



ffl SORTING 



Sort lists in a flash! 



CALCULATOR 

Built-in 4 function calculator! 




SPLIT-SCREEN 
EDITING 

Freeze a portion of text and edit 
lanother. Its fantastic! 




GRAPHICS 



Y Insert graphics in 
your documents! 
Allows you to import 
PMODE 3/4, HSCREEN and 
CoCo Max II/III pictures! 






■ . . 






Align your text 
(with a few keystrokes! 



2 COLUMN 
PRINTING 

in 2 columns 



SAVING / LOADING 

Creates ASCII files that are compatible with 
other word-processors, terminal programs, 
etc. Allows directory point & select for easy 
loading/saving, Automatic Backup, file 
erase, free space display. ARE YOU SURE? prompts prevent 
accidental deletes. The Auto-Save feature automatically saves 
text to disk during user-defined intervals for peace of mind. 
Supports double-sided drives. 




MACROS 

Playback 
I up to 250 
keystrokes 
with a sin- 
gle key! 
Automate multiple 
tasks with a single 
key! You'll love it! 





MAIL MERGE 

'Type a letter, follow it 
with a list of names & 
addresses and have Word 
Power print out personal- 
ized letters. Its that easy! 



PRINTING 



n-r 



Works with all printers that work with the CoCo. Allows options 
g&u^ such as baud rales, spacing, page/print pause, partial print, page 
>. jnumbering/ placement, linefeeds, multi-line headers/footers, right 

r ~ - justification and number of copies. The values of these options can 

be changed in the text by embedding Printer Option Codes. The WHAT YOU SEE 
IS WHAT YOU GET feature allows you to preview the text on the screen as it will 
appear on the printer. You can view margins, page breaks, justification and more. 



SPELLING CHECKER 



ord Power 3.3 include 
a 80,000 word spelling 
checker which finds and 
corrects mistakes in your 
text. 




DOCUMENTATION 

Word Power 3.3 comes with a well-written 
instruction manual & reference card which 
makes writing with Word Power as easy as pie. 
Word Power 3.3 comes on an unprotected disk. 



MJF 



FREE 
T-SHIRT 

wilh full order of 
Word Power 3.3. 
(Specify Size) 



PUNCTUATION 

CHECKER 

■ 

This checker will proofread 
lyour text for punctuation errors 
such as capitalization, double- 
words, a/an usage, spaces and 
more. Its the perfect addition to 
any word-proccessor. 



Upgrade Policy: Word Power 3.2 
owners can get Word Power 3.3 by 
sending original Word Power disk 
and S15 to Ihe address listed below. 



MICROCOM SOFTWARE, 2900 Monroe Ave, Rochester.NY 14618 OS I 

All Word Power 3.2 orders shipped by UPS 2nd Day Air at No Extra Charge in Continental US.\ 
For Detailed Order Information, refer to Page 17 of our 6-pagc Ad scries(Pgs 7-17). 
To Place Credit Card Orders Call Toll Free 1 -800-654-5244 (9am-8pm 7 days/week) 
Technical Support (4-8pm), Order Status, Info, Technical Info; 716-383-8830 



I E3 «S 




History in the Making 




I am just back from RAINBOWfest 
with some of the most exciting news 
we have had in a while — the final 
agreement has been reached to allow 
us to publish a history of our Color 
Computer. 

As far as I know, no single computer has 
a book about its history. This is probably 
because few computers are as long-lived or 
have attracted such a following as has our 
own Color Computer. 

The working title for this book, which 
we expect to publish in late summer, is 
CoCo — An Affectionate History of the 
Tandy Color Computer. The authors will 
be Dale and Esther Puckett. 

Dale, as many of you may know, has 
served for more than two decades as an 
officer in the United States Coast Guard. 
Esther has served along with him in a 
number of places and in a wide variety of 
locations. Dale's personal computer expe- 
rience goes back as far as it can — to the 
Altairkit. 

Dale brings the seriousness of the scholar 
and the care of a programmer to the team. 
Esther, as all of you who are fortunate 
enough to know her know, provides wil 
and wisdom as well as excellent insights to 
just about everything. They will. 1 believe, 
make an excellent team. 

Dale and Esther plan to get started slowly 
as they wind up their tour of duty with the 
Coast Guard. Once that happens (around 
the first of February), they plan to move 
back home to Kansas and work on the book 
full-time. 

Production for the book was planned a 
couple years ago with former rainbow 
editor Jim Reed as the author. Jim, how- 
ever, did not feel capable of writing a 
history to the extent I wanted, and we 
suspended the project. Now it is active 
again and. 1 feel certain, on its way to 
completion! 



CoCo will, most significantly, be about 
people like you. I have stressed to Esther 
and Dale that they must, of course, give full 
and in-depth information, including anec- 
dotes and stories, about every person who 
was part of the CoCo Community — even 
before there was a CoCo Community. As 
an "affectionate history," this is important 
if we are to demonstrate in print the affec- 
tion so many of us feel for our favorite 
computer. 

Beginning in February. Dale and Esther 
will be doing a lot of traveling and tele- 
phone calling, interviewing hundreds and 
hundreds of people for hours on end. Their 
result will be an entertaining and factual 
account of how one computer attracted a 
huge following totally beyond the expecta- 
tions of its developers and how it affected 
and changed so many of our lives. 

We project that CoCo will be between 
200 and 300 pages, including photographs, 
and will sell for about SI 5.95. It will be the 
paperbound book, like the others in our 
Rainbow Bookshelf collection, with an 
attractive cover. 

In addition, we plan to publish a hard- 
cover special limited edition that includes 
the gold-foil stamped name of the person 
who buys the book. We will take advance 
orders for these and they will sell for $45. 
I am not going to hype the phrase collec- 
tor's item, but this would be a perfect gift 
for any member of the CoCo Community. 

Either this month or next month we will 
be offering the soft-cover version of CoCo 
on an advance basis, at a discount of $ 13.50. 
Gift certificates will be available for this 
holiday season. 

I am very excited about this project and 
1 think you will be. too. After all. I think the 
computer that has made history deserves a 
history book of its own! 

— Lonnie Falk 
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Programming Secrets Galore 



Pokes, Peeks and Execs arc your guides into the jungle of computer programming. These commands give you the power of 
Machine Language without leaving the security of BASIC. Each book is a collection of "inside" information, with explanations 
and examples to help you immediately put it to use. Everyone from the novice to the professional will find these handy books a 
wealth of information. — 



300 POKES, 
PEEKS, 'N EXECS 
for COCO III 



'40/80 column Screen Text Dump 
"Save Text/Graphics Screen lo Disk 
"Command/Funclions Disables 

• Enhancements for CoCo3 BASIC 

• 128K/5 12K RAM Test Program 

• I II'RI NT Character Modifier 

Only $19.95 



r 500 POKES 
PEEKS,'N EXECS 

"Autostart your BASIC programs 

•Disable Color BASIC/ECIVDisk BASIC \ 

commands 

* Disable Break Key/ Clca r Key/ Reset Button 

•Generate a Repeat-key 

•Transfer ROMPAKs to tape 

•Set 23 different GRAP1 IIC modes 

' Merge two BASIC programs 

'And much much more!!! 

J?or CoCo 1 .2 and 3. Only $ 16. 95 
ALL 3 BOOKS for: $29.91 



SUPPLEMENT TO 500 

POKES.PEEKS, 'N EXECS 

200 additional Pokes, Peeks and lixecs 
(500 Pokes Pecks "N Execs is a prerequisite) 
•ROMPAK transfer to disk 

• PAINT with 65000 styles 

• Use of 40 track single/double sided drives 
' I ligh-specd Cassette Operation 
•Telewriter, CoCo Max enhancements 

• Graphics Dump (for DMP printers) 
/Text Screen Dump 

For CoCo 1,2 or 3. Only $9.95 



Sfi* UNRAVELLED SERIES 



I An invaluable aid for Basic and Machine Language programmers, these 
books provide a complete disassembly and annotated listing of the 
I BASIC/IiCB and Disk ROMs. These listings give complete, uninlcrupled 
I memory maps of the four ROMs. Gain complete control over all versions of 
the color computer. 

EXTENDED COLOR BASIC UNRAVELLED: COLOR 

BASIC and EXTENDED BASIC ROM Disassembly: $39.95 
DISK BASIC UNRAVELLED: DISK BASIC ROM" 1.1 and 
1.0 Disassembly: $19.95 

BOTH ECB AND DISK BASIC UNRAVELLED: $49.95 
1 SUPER EXTENDED BASIC UNRAVELLED: SUPER EX- 
TENDED BASIC ROM Disassembly for CoCo 3. $24.95 
COMPLETE UNRAVELLED SERIES (all 3 books): $59.95 



COCO LIBRARY 



CoCo 3 Service Manual: $39.95 

CoCo 2 Service Manual: $29.95 

Start OS9 Book + Disk: $32.99 

Inside OS9 Level II: $19.95 

Rainbow Guide To OS9 Level II: $19.95 

Rainbow Guide To OS9 Level II Disk: $1 

Complete Rainbow Guide To OS9: $19.95 

Complete Rainbow Guide to OS9 2 Disks: $29.95 

Assembly Language Programming(tcpco): $18 

Addendum For CoCo3 (tepco): $12 
Color Computer Disk Manual: $29.95 
Multipak Service Manual 

(Specify Model): $19.95 
Disto Turn of the Screw Book: $19.95 




„ Tricks 



GAMES 



(CoCo 1,2,3 Disk unless otherwise specified; min 32K) 



$5 

;C rets 

$9 



Warrior King (CoCo 3): $29.95 



WIZARD'S CASTLE: A hi-res graphics adventure game 



tvnirii¥T«*l 



IriT*K*iTiTi ■ii»tTTHTT7S3 



i'[fPHD>ll 



Hall of the King 1,2,3: $29.95 ea Trilogy: $74.95 
Kung Fu Dude: $24.95 ^*-l 

Dragon Blade: $19.95 Champion: $19.95 
White Fire of Eternity: $19.95 V 

Quest for the Spirit Stone (CoCo 3): $18 
Sinistaan $34.95 Kyum-Gai: $29.95 
Paladin's Legacy: $24.95 Soundtrax: $34.95 UBii i £!:! I 
Slots & Cards (CoCo 3): $39.95 ,m &»: | .>: 

Leisure Suit Larry: $49.95 |v% VAlV'% 

TREASURY PACK #1: Lunar Rover Patrol, Cubix, 
Declathon, Qix, Keys of Wizard & more. Only $29.95 
TREASURY PACK #2: Lancer, Ms. Gobbler, Froggie, Mad- 



Warp Fighter 3D (ForCoCo3): $24.95 Bash (ForCoCo3): $24.95 
Mine Rescue (For CoCo 3): $24.95 The Seventh Link: $38 
Caladuril 2: Weatherstone's End: $54 
Speed Racer Buckle your seatbelt and get ready to race in 
this Pole Position® type game. Only $34.95 
Pinball Factory: Design, Build, Edit and Play the classic game 
of Pinball. Min 64K. Only $34.95 

Demon Seed: Battle the diving & bloodthirsty bats. $19.95 
Cashman: Explosive color, fast-moving animation and amaz- 
ing sound-effects! Has over 40 levels! $29.95 
Fury: An action packed airborne dogfight simulation. $29.95 
Time Bandit: Fight the Evil Guardians, Killer Smurphs & 



tMMi;M 



Race, Space War, Galax Attax, Anaroid Attack, Whirlybird, p« thouse ; ° ne of the funniest most original games. Excel- 
Space Sentry & Storm Arrows. Only $29.95 lent graphics, sound effects & payability. $19.95 

Mudpies: Crazy circus fun! Only $29.95 

\mi MICROCOM SOFTWARE 2900 Monroe Ave, Rochester, NY 14618. _ 
To Order and info on free gift: Refer to Page 1 7 of our 6-page series (Pgs 7-17). 



Credit Card Toll Free Orderline 1-800-654-5244 

(9AM - 8PM 7 DAYS/WEEK) 

Tech. Info (Between 4-8pm), Order Status, Info: 716-383-8830. Fax: 716-383-0026. 



Feature 



When that one little error threatens 
to ruin your day 




Save the Variables! 



by Mike Moore 



This handy program enables you 
to chain BASIC programs or keep 
all the variables while you edit a 
program. I find Basic's habit of 
erasing all variables during ED- 
ITS or PCLEARs to be very annoying. When 
you are debugging a program and have 
entered lots of data, it is very frustrating to 
lose it all because of a small error that needs 
correcting. I used to wonder why it hap- 
pened, and in writing this program I think 
I found out. 

The idea sounds simple enough. To save 
the variables we move the bytes that BASIC 
has stored into free memory and later bring 

Mike Moore is a math professor who di- 
vides his spare lime between soccer and 
working on his CoCo. Address questions 
and comments to him at 2 Aurora Circle , 
Ncpean, ON, Cdn. IK2G 0Z7. 



them back again. With numeric variables 
this is easy enough, but string variables 
present a challenge. This is because some 
strings are stored in the BASIC program 
itself and might be moved or changed dur- 
ing editing. 

For such strings, the first seven charac- 
ters are also copied into free memory so 
they can be checked later. If you have 
plenty of memory available, you can in- 
crease this by changing the 7 in Line 1 00 of 
the listing to a larger value. Strings of up to 
six characters are stored in full. 

The code is position-independent and 
can be stored anywhere in memory. Users 
with only 16K of memory should change 
the 32261 to 15877 in lines lOand 20. Make 
sure you have saved the loader program 
before you try to execute the code because 
an error in typing in the data might cause 
you to lose everything. 
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COCO UTILITIES GALORE 

(For CoCo 1,2,3 RSDOs M:n 32K I .less Oiherwise Specified) 

Vcr Tape Orgranize 



Super Tape/disk 
Transfer 



O S9 (New Products Added Every Month) 
■— ■% Kux^!simniis iixm iiti !miiiij::::.\'.xi t 

I I Transfer Utilities 



Window Writer 



Transfers Tape-To-Disk, Disk- 
to-Tape,Disk-to-Disk,Tape-To- 
Tape. Only $24.95 SI 9.95 



Powerful OS9 word processor 
Organize your videotapes.Only wUh multitasking, pull down 



TO 



Add, Edit, View, Print 
(Select/All), Sort Mailing 
Labels. Only $19.95 $14.95 



inSMMMMMMnMRMMM 



Add, 




Sixdrive I 

Allows use of 3 double-sided 
drives from RSDOS or ADOS. 

Disk Only $16.95 

Disk Label Maker 

Design Professional labels. Al- 
lows expanded, normal, con- 
densed text w/ Double-Strike & 
Borders. Supports DMP, Star, 
Gemini, Epson & Comp. 
Printers. Only $19.95 $14.95 

Disk LtiltJ , .;> \ a 

The best disk management 
program for the CoCo 2 & 3. 
Only $19.95 $9.95 

Bowling Score Keeper I 

For Team & Individuals. $19.95 



Computerized 
Checkbook 

'"■-'■-;■ ■■■■■. 

View, Search & 
Checkbook Entries for savings/ 
checking & other accounts. 
Only $19.95 $14.95 

CoCo 3 Screen Dump : ; 

32/40/80 column, PMODE 3/4 
dump. Allows you to take snap- 
shots of screens while program 
is running! For DMP & Epson/ 
Gemini/ Star & Compatibles. 
Only $19.95 $14.95 (CoCo 2 
compatible) 

RGB Patch 



Displays most graphics in Color 
on RGB Monitors. For CoCo 
3,Only $24.95 $19.95 

['KEYS 111 

Create up to 20 function Keys. 
EPROMable. For CoCo 3.0nly 
$19.95 



$19.95 $14.95 

Home Bill Manager 
Organize your Bills.Only $12.95 

Calendar Maker 

Calendr & Appts. Only $12.95 

From Cer-comp... 

Window Master: Windowing En- 
vironment for CoCo 3. $69.95 w/ 
HiRes: $79.95 
Window Writer: $59.95 
Window Basic Compiler: $99 
Window ED/TASM: $49.95 
Font/Icon Editors: $19.95 
Advanced Prog. Guide: $24.95 
CBASIC:Basic Compiler. Specify 
CoCo 1,2 or 3. Only $149.95 
The Source: Best Disassembler. 
Specify CoCo 1,2 or 3. $49.95 
EDT/ASM: Best Assembler. Specify 
CoCo 1,2,3. $59.95 

Telewriter 64 

■■■■■WMaMWWW HuriimivwMiu w w i iniOTvtiiiiv i iw 
Best Word Processor for CoCo 

2. Disk: $57.95 Cas: $47.95 

mmmmmammmimit mmmmm i immmi i nuim 



I Autoterm 

Best Terminal Software. 
$39.95 Cas: $29.95 



Disk: 



v-.y : : --:.- : ;sv>: 

From I>« Preble® 

Basic Freedom: $24.95 
Vocal Freedom: $34.95 
Mental Freedom: $24.95 
Hacker's Pac: $14.95 

Disk Utilities 

Use all 360K from your double 
sided drive & more. $17.95 
MEMORY MASTER 
Run 2 programs at once, fix 
disks, scan, edit memory on 
CoCo 2. Only $24.95 



Vt. 



rm 



VT 



Terminal Software w/ 
Emulations and much more. 
CoCo 3 Only. Only $39.95 

Basic Windows 



By Kevin Bemcr 

Run 6 Basic Programs at the 

same time! Req. 512K. $39.95 



menus & much more. Only $59 
DynaSpcll: 102,000 word spell- 
ing checker! Only $19.95 

RSB vl.3 

The revolutionary program that 
allows you to use Basic under 
OS9 Level II to take advantage 
of features. Only $39.95 

Start OS9 

An excellent hands-on guide to 
OS9 Level II for the beginner. 
Req 512K, 2 Drives & Monitor. 
Book & Disk Only $32.99 



| From Alpha Software© 

OS9 Level II BBS V3.0: The ab 
solute best BBS program for 
OS9. Even comes with its own 
terminal Program. Req. 512K & 
RS232 Pack. Only $29.95 
Level II Tools: 25 utilities such 
as windowing, wildcards, tree 
and more. Only $24.95 
Disk Manager Tree: Change, 
copy, view,create directories 
with ease. Req 512K. $29.95 
Warp One: Complete Level II 
Windowing Terminal. Req 512K 
& RS232 Pack. Only $34.95 
The Zapper: Patch Disk Errors. 
Disk Only $19.95 
Multi-Menu: Create your own 
pop-down windosvs. Req 512K 
and Multi-Vue. Only $19.95 
Presto Partner: Have a notepad, 
calculator, calendar, phone 
book.RT clock & more at your 
fingertips. 512K Req. $29.95 

| From R3 Systems® 1 

Screen Control Utility: Gain 
Complete control of your text 
screen. Only $19.95 
Menuing Utility: Complete 
memory resident menuing sys- 
tem. Only $19.95 
Point & Shoot File Selection: 
Only $19.95 

WftW: 

Multi-Edit 



Create, Edit Application Infor- 
mation Files & Icons for Multi- 
Vue. Only $24.95 



GSC File Transfer: Transfer 
files from MSDOS / OS9/ 
RSDOS & Flex. Req OS9 (Level 
II for Multivue Ver.),2 drives, 
SDISK/SDISK3. Standard Version: 
$44.95. Mullivue Version: $54.95 
SDISK3: Standard drive re- 
placement module allows use of 
40/80 DS/DD drives. Req. OS9 
Level II. $29.95 SDISK: $29.95 
PC-Xfer Utilities: Programs to 
format/transfer files to/from 
MSDOS disks to CoCo under 
Level 1/2. Req SDISK(3): $44.95 

1 OS9 Level II Ramdisk 1 

wmmmwsmsxxxxt:-. ■■■,:■.. 

In-memory disk drive! Req 

512K. Disk Only $29.95 

>:#8Sft»ft 

"3? I Goldberg Utilities I 

■^-'^^■^■::::^.'--x''--'-:v^''-/-':::v::-:-':-- :■:■:-:•:.:•. -'- 

Power-packed utilities w/ 15 
useful commands such as sort, 
lost file location, disk pack & 
much more. Only $24.95 

iFrom Burke & Burke®. 

Wild & MV Version 2.1: Use 

"wildcards" with OS9 & re-ar- 
range directory tree. $19.95 
EZGen Version 1.04: Powerful 
OS9 boolfile editor. Changes 
names, add/delete modules, 
patch bytes, etc. $19.95 

| Prom Microtech®^ 

XWord: Best OS9 Word Proces- 
sor with True character oriented 
& more. $69.95 

XMerge: Mail Merge for 
XWord. Only $24.95 
XSpell: 40000 word spelling 
checker. OrJy $39.95 
XED: Full Screen Editor. $39.95 
XDIS: Disassembler. $34.95 
XTerm: OS9 Communications 
Program. Only $49.95 
XDir & XCal: Hierarchial direc- 
tory, OS9 calculator. $24.95 
;pxs^x<i>mmisto>9msmmammx-. 

I From Frank Hogg®... 1 

Dynastar: Most Popular OS9 
Word Processor. Only $99.95 
Both Dynastar & Spell: $119.95 
Wiz: Communications Program. 
Req RS232 Pack. $59.95 






I From Sugar Software®! 
OS9 Cailigrapher:Oniy $24.95 



jlMP MICROCOM SOFTWARE 2900 Monroe Ave, Rochester, NY 14618. 
To Order and info on free gift: Refer to Page 17 of our 6-page series (Pgs7-17). 

Credit Card Toll Free Orderline 1-800-654-5244 

(9AM - 8PM 7 DAYS/WEEK) 

Tech. Info (Between 4-8pm), Order Status, Info: 716-383-8830. Fax: 716-383-0026. 




Once the code is installed, you can type 
EXEC 32261 to see how it works. If there are 
no variables because a program has not 
been run. you get the message Nothing 
Saved. But if all is well, you simply get the 
message Saved. You are now free to change 
your program to see if you can restore the 
variables. If there is not much free memory 
(typing PRINT MEM tells you how much), 
you gel either Not Enough Memory or-. 
Some Strings Lost as your message. 

In the first case there is not enough space 
in memory . and the variables have not been 
saved. In the second case the numeric vari- 
ables should be OK, but some of the strings 
may be lost. They might be recoverable, 
but there is no guarantee that all your origi- 
nal strings will come back when you try to 
restore the variables. 

If you edit, delete or insert a line, you 
will find that basic no longer has any of 
your variables. Try adding the new line 
REM NEW LINE to your program and then 
check any variable. Nothing there? Try a 
second EXEC, and you should get the Re- 
stored message. You can check by printing 
any variable. If the memory area to which 



the variables were moved has been dis- 
turbed, you get a Cannot Restore message. 
When you have typed in and run the 
loader program, save the code produced as 
a machine language program. For 32K users. 



I he most useful 
function this 
program serves is 
that it enables you 
to chain programs. 



(C)SAVEM"VARKEEP". 32261. 32767. 32261 
does this, while 16K users should type 
(C)SAVEM"VARKEEP". 15877. 16383. 15877. 
Perhaps the most useful function this 
program serves is that it enables you to 
chain BASIC programs. That is, you can get 
one program to run another from disk and 
pass its variables to the new program. As an 
example, type in and save the following 
short program as PR I NT IT: 



10 EXEC32261 

20 PRINT I : FOR 1-0 TO 9 : PRIN 

TA(I); : NEXT 

30 PRINT : PRINT C$ 

Next, type in and run: 

10 C$="CHARACTER"+— 

20 FOR 1-0 TO 9 : A(I)-2*I : NEX 

T 

30 EXEC32261 : LOAD "PRINTIT" , R 

You get the Saved and Restored mes- 
sages, and the values of the variables are 
displayed. Note that although PRINTIT does 
not define any variables, executing VARKEEP 
to keep and restore the variables allows 
their values to be passed to the second 
program. 

I have one word of caution here: Notice 
that C$ is defined in a seemingly odd way. 
This is to force BASlCto store CHARACTER in 
the string space. If you leave out the +"", 
then C$ is kept in the program. Loading in 
PRINTIT overwrites the original and pro- 
duces a Strings Lost message when VARKEEP 
tries to restore the variables. Q 



16K Extended : 



^ 




120.. 56 

180. ...40 

230. ..79 

270 ............ 69 

320 123 

360 160 

END .....61 



The Listing: VARKEEP 

'COPYRIGHT 1989. FALS0FT. INC. 
10 CLEAR200. 32261 : REM VARKEEP 
LOADER BY MIKE MOORE 
20 S-32261 
30 E-S+432 
40 F0RA-S TO E 
50 READ B:P0KEA.B:C-C+B 
60 NEXT 

70 FOR E-l TO 5 : READ A$ 
80 FOR B-l TO LEN(A$) : POKE A.A 
SC(MID$(A$.B.D) : A-A+l :NEXT 
90 POKE A. 13 : A-A+l : NEXT 
100 IF C-38627THENPRINT"D0NE"ELS 
EPRINT"BAD DATA 

110 DATA 49. 141. 1. 6. 134. 7. 
183. 2. 11. 166. 164. 111. 164. 
183. 2 

120 DATA 10. 39. 61. 48. 232. 16 
0. 156. 31. 16. 47. 0. 166. 175. 
33. 220 
130 DATA 27. 147. 31. 38. 11. 10 
8. 164, 237. 35, 49, 141. 1. 179 
. 22. 

140 DATA 153. 48. 139. 175. 35. 
174. 33. 222. 31. 166. 194. 167. 



130. 17. 147 
150 DATA 27, 46. 247. 220. 29, 1 
47. 27. 48. 139. 175. 37. 220. 2 

7, 195. 

160 DATA 32, 253, 2. 0. 174. 37. 

52. 16. 174. 35. 39. 50. 31. 18 
. 182 

170 DATA 2. 10. 38. 9. 51. 141. 
0. 225. 127. 2. 9, 32, 4. 51. 14 
1 
180 DATA 0. 103. 255. 2. 3. 173. 

159. 2. 3. 49. 141, 0. 148. 238 
. 33 
190 DATA 255. 2. 5. 16. 174. 37. 

182. 2. 10. 38. 10. 51, 141. 0. 

194 
200 DATA 32. 8, 108. 164. 53. 14 
4. 51. 141. 0. 71. 255. 2. 3. 16 
. 188 

210 DATA 2. 5. 44. 26, 236, 34. 
51. 171, 239, 228, 109. 33, 42. 
11. 166 

220 DATA 36. 72. 139. 5. 49. 166 
. 173. 159. 2. 3. 16. 174, 228, 
32. 224 
230 DATA 182. 2. 10. 39. 88. 49. 

141. 1. 41. 141. 8. 53. 160. 10 

8. 164 

240 DATA 49. 141. 1. 5. 166. 160 
. 173. 159. 160. 2. 129. 13. 38. 

246. 57 
250 DATA 109. 33. 49. 34. 42. 33 
. 238. 34. 17. 147. 27. 46. 26, 
230. 164 
260 DATA 39. 22. 241. 2. 11. 47. 

3. 246. 2. 11. 80, 48. 133. 80. 

90 
270 DATA 166. 197. 167. 133. 90. 

42. 249. 108. 36. 49. 37. 16, 1 



72. 98. 45 

280 DATA 1. 57. 188. 2. 0. 47. 5 

2. 110. 159. 2, 3, 1, 59, 55. 59 

290 DATA 20. 59. 55. 49. 141, 25 

5. 245. 108. 164. 174. 35, 222. 

27. 166. 128 

300 DATA 167. 192, 172. 33. 45. 

248. 223. 31. 236, 37, 163, 35. 

211. 27, 221 

310 DATA 29. 50. 126. 182. 2. 9. 

38. 6. 49. 141. 0. 121. 32. 4. 
49 

320 DATA 141. 0, 124. 23. 255. 1 
34. 53. 176. 166. 33. 49. 34. 42 
. 50, 166 
330 DATA 36, 39. 46. 74. 38. 82. 

167. 36. 191. 2. 7, 222. 27, 23 
0. 164 
340 DATA 242. 2. 11. 47. 3, 246. 

2. 11. 247. 2. 2. 166. 130. 161 
. 194 

350 DATA 39. 29. 17. 147. 25. 46 
. 247. 124. 2. 9. 190. 2, 7. 246 
. 2 
360 DATA 2. 80. 48. 133. 49. 37. 

16. 172. 98. 45. 1. 57. 110. 15 
9. 2 

370 DATA 3. 255. 2. 0. 90. 39. 1 
7. 166. 130. 161. 194. 39. 247. 
254. 2 

380 DATA 0. 190, 2, 7, 246, 2. 2 
, 32. 198. 239. 34. 32. 217. 49. 

141 
390 DATA 255. 100. 108. 164. 49. 

141, 0. 64. 50. 100. 22. 255. 2 
2 

400 DATA restored, SOME STRINGS 1 
ost.NOT ENOUGH memory .nothl ng sa 
ved. cannot restore 
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DISTO PRODUCTS 

All Disto Products now carry a 1-Year Warranty and arc 

shipped 2nd Day Air (at no extra charge!) within Continental 

US. All Disto Add-Ons (& Super Controller II) include OS9 

Drivers, unless otherwise specified. 

Disto Mini Controller (with RSDOS or CDOS) : $74.95 

Disto Super Controller (with RSDOS or CDOS): $99.95 

Disto Super Controller II (with RSDOS or CDOS): $129.95 

• Mini Eprom Programmer Add On: $54.95 

• Hard Disk Adapter: $39.95 w/ RS232: $69.95 

• RT Clock & Printer Interface: $34.95 (OS9 Driver: $19.95) 
• 3-in-l Multiboard Adapter: Parallel Port, RT Clock & 

RS232 Port. $74.95 
• MEB Adapter II: $34.95 

• 4-in-l Board: Parallel Port, RT Clock, RS232 & Hard Disk 

Interface: $129.95 
RS232 Super Pack: True RS232 Port for your CoCo! Com- 1 
patiblc with Tandy® RS232 Pack. Includes DB25 Cable. 100% 
Compatible with OS9 ACIA Software. Req. Multipak. Only | 
$54.95 



-T/V 



e(T 



$199 



DRIVES 



<2 Drive 
System 

$299^ 



HARD DRIVES, Etc. 

[Systems w/ Seagate Hard Drive, Controller, Cables, CoCo XTl 
I Interface, Cables, Case (with fan & Power Supply), Software! 
I (OS9 Software & HYPERIO Software!) & Instruction Manuals.! 
|Assemblcd/Tcsted/Formatted. Just Plug'N'Run. Req. Multipak. I 

Disto Hard Drives Systems Also Available M 

ISeagate 20 Meg System: $509 (§? SSSOStB &&$ • 
ISeagate 30 Meg System: $539 $BBmii__ 

I CoCo XT: Use 2 5-120 Meg Drives with your CoCo. Only $69 .95 1 
|w/ Real Time Clock: $99.95 

ICoCo XT ROM: Boots OS9 from hard/floppy. Only $19.95 
I HYPERIO: Allows Hard Drive use with RSDOS. Only $29.95.| 
HYPERIO Disto Version. Only $29.95 
| HYPERIII: R AMDisk & Spooler to CoCo 3 HYPER I/O. $12.95 1 

HYPERIO Utilities (by Kevin Bcrner) 
I Hard Drive Utilities: MSA Backup, Copy/Kill/Rename, Hard| 
[Disk Backup to Floppies (vica versa) & more. Only $21.95 
I Disk Doctor: Checks/locks out bad sectors, only $17.95 
I Hard Drive Zap: View tracks, sectors, modify data on your hard I 
disk. Only $21.95 



There are a lot of dealers selling disk drives for the CoCo. Why buy from us? First, 
| all our drives are BRAND NEW DOUBLE SIDED Drives. They arc sleek, fast 
(6ms!), quiet and have a reputation of superb performance and reliability. Second, 
our Drive & 2 Drive Systems come with the acclaimed DISTO Controller - with gold 
plated contacts & built-in ROM which allows you to access BOTH sides of our drives!. 
Third, our Drive & 2 Drive Systems come with the Official 200 page Radio Shack 
Disk Manual. Fourth, you gel $50 worth of our utility software (Disk Util 2.1A & 
I Super Tape/Disk Transfer). Our drive systems arc head & shoulders above the rest! 

Drive (with Disto Controller, Case, Power Supply, 1 Drive Cable, Manual, Software): $199 
J Drive 1 (with Case, Power Supply & Software): $129 Bare 5 1/4" Drive: $89 

2 Drive System (With Disto Controller, Case, Power Supply, 2 Drive Cable, Manual & Software): | 
$299 

1 Drive Cable: $16.95 2 Drive Cable: $22.95 4 Drive Cable: $34.95 

FD501 Upgrade Kit: Bare Drive, 2 Drive Cable & Instructions: $109 
FD502 Upgrade Kit: Bare Drive, 2 Drive Cable, Power Cable & Instructions: $119 



MAGNAVOX 8CM515 RGB 
Monitor 



$278 



1 



Razor Sharp picture quality 
for your CoCo! Has 14" 
Screen, Analog/TTL RGBi 
& Composite Inputs for 
CoCo 2/3, Speakcr,Text Dis- 
play Switch, Tilt Stand & 2 Year Warran- 1 
ty. Compatible with CoCo, IBM & many 
other computers! Only $278 (add $12 1 
S&H/$40 in Canada) 

Magnavox RGB Cable for CoCo 3 and 
Composite Video / Audio Cable Set with J 
Purchase of Monitor: $19.95 



More Good Stuff... 
I DS69B Digitizer: Use your CoCo to display pictures from your VCR. Comes complete with CSEE | 
Software. Only $149.95. CoCo 2 Version: $99.95 




ols with 3 butto n! 
n:$12.95 I 



Advanced Gravis Joystick: Features tension, rotary-centering, free floating controls with 3 buttons. 

Only $59.95 

Rascan Color Video Digitizer w/ Software: %1S93S 

MPI Locking Plate (Specify 26-3024/3124): 

5 1/4" DS/DD Disks: $.40 each 

5 1/4" Colored DS/DD Disks: $.89 each 

3 1/2" DS/DD Disks: $1.49 each 

5 1/4" Disk Case (for 70 disks): $9.95 

3 1/2" Disk Case (for 40 disks): $7.50 



NX1000 Color Ribbon:$12.95 
NX 1000 Black Ribbon: $8.50 
Seikosha, EPSON, DMP.Panasonic, Okidatf 
Gemini Ribbons: Only $8.50 each 



512KCoCo3 

Brand new Color Com- 1 
puter 3 with 512K In- 
stalled and tested! Comes I 
with complete manuals I 
and $100 worth of | 
I software! 

Only $239 
Please Add $10 S&H 

512K Installat. Voids Warranty 



Studio Works 
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Superb Digital Audio Sampler. 
Great for special effects. Only 

$39.95. w/Cablc: S54.95 



. J|«&1 
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jjfi 
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How To Read Rainbow 



When we use the term CoCo, we refer to an affection- 
ate name that was first given to the Tandy Color 
Computer by its many fans, users and owners. 

The BASIC program listings printed in the rain- 
bow are formatted for a 32-character screen — so they 
show up just as they do on your CoCo screen. One easy 
way to check on the accuracy of your typing is to com- 
pare what character "goes under" what. If the charac- 
ters match — and your line endings come out the same 
— you have a pretty good way of knowing that your 
typing is accurate. 

We also have "key boxes" to show you the minimum 
system a program needs. But, do read the text before 
you start typing. 

Finally, the little disk and/or cassette symbols on the 
table of contents and at the beginning of articles 
indicate that the program is available through our 

RAINBOW ON DISK or RAINBOW ON TAPE Service. 



Using Machine Language 



The easiest way to "put" a machine language program 
into memory is to use an editor/assembler, a program 
you can purchase from a number of sources. All you 
have lo do, essentially, is copy the relevant instructions 
from the rainbow's listing into CoCo. 

Another method of putting an ML listing into CoCo 
is called "hand assembly" — assembly by hand, which 
sometimes causes problems with OR I G I N or equate 
statements. You ought to know something about 
assembly to try this. 

Use the following program if you want to hand- 
assemble ML listings: 

10 CLEAR200,&H3F00:I=&H3F80 

20 PR I NT "ADDRESS : " ; HEXS ( I ) ; 

30 INPUT "BYTE"; 8$ 

40 POKE I, Vf)L("&H"+BS) 

50 I = 1+1: GOTO 20 



This program assumes you have a 16K CoCo. If you 
have 32K, change the &H3F00 in Line 10 to &H7F00 
and change the value of I lo &H7F80. 



OS-9and RAINBOW ON DISK 



The OS-9 side of rainbow on disk contains two 
directories: CMD5 and SOURCE. It also contains a file, 
read . me . F i rs t, which explains the division of the 
two directories. The CfiDS directory contains executa- 
ble programs and the SOURCE directory contains the 
ASCII source code for these programs. BASIC09 
programs will only be offered in source form so they will 
only be found in the SOURCE directory. 

OS-9 is a very powerful operating system. Because 
of this, it is not easy to learn at first. However, while we 
can give specific instructions for using the OS-9 



programs, you will find that the OS-9 programs will be 
of little use unless you are familiar with the operating 
system. For this reason, if you haven't "learned" OS-9 
or are not comfortable with it, we suggest you read The 
Complete Rainbow Guide to OS-9 by Dale Puckett and 
Peter Dibble. 

The following is not intended as a course in OS-9. It 
merely states how to get the OS-9 programs from 
rainbow on disk to your OS-9 system disk. Use 
the procedures appropriate for your system. Before 
doing so, however, boot the OS-9 operating system 
according to the documentation from Radio Shack. 

1 ) Type 1 oad d i r 1 1 s t copy and press enter. 

2) If you have only one disk drive, remove the OS-9 
system disk from Drive and replace it with the OS- 
9 side of rainbow on disk. Then type chd'aa 
and press enter. If you have two disk drives, leave 
the sytem master in Drive and put the rainbow 
on disk in Drive 1. Then type chd'dl and press 
enter.' 

3) List the r-Bad . me . f l rs t file to the screen by typing 
list r-Bad . me . F i rs t and pressing ENTER. 

4) Entering di r will give you a directory of the OS-9 
side of rai nbow on disk. To see what programs 
are in the CMOS directory, enter d i r cmds. Follow 
a similar method to see what source files are in the 
SOURCE directory. 

5) When you find a program you want to use, copy it 
to the CMDS directory on your system disk with one 
of the following commands: 

One-drive system: copy 'de'cmds' tilename /dtd' 
crnds'tllename -s 

The system will prompt you to alternately place the 
source disk (rainbow on disk) or the destination 
disk (system disk) in Drive 0. 
Two-drive system: copy 'd l 'cnids' filename 'd<6s 
cmds' filename 

Once you have copied the program, you execute it 
from your system master by placing that disk in Drive 
and entering the name of the file. 



The Rainbow Seal 



rainbow 

CIBtlFICAIION 
MAI 

The Rainbow Certilication Seal is our way of helping 
you, the consumer. The purpose of the Seal is to certify 
to you that any product that carries the Seal has actually 
been seen by us, that it does, indeed, exist and that we 
have a sample copy here at the rainbow. 

Manufacturers of products — hardware, software and 
firmware — are encouraged by us to submit their prod- 
ucts to the rainbow for certification. 

The Seal is not a "guarantee of satisfaction." The 
certification process is different from the review 
process. You are encouraged to read our reviews to 
determine whether the product is right for your needs. 

There is absolutely no relationship between advertis- 
ing in the rainbow and the certification process. 
Certification is open and available to any product per- 



taining to CoCo. A Seal will be awarded to any com- 
mercial product, regardless of whether the firm adver- 
tises or not. 

We will appreciate knowing of instances of violation 
of Seal use. 



Rainbow Check Plus 



GT 



The small box accompanying a program listing in 
the rainbow is a "check sum" system, which is 
designed to help you type in programs accurately. 

Rainbow Check PLUS counts the number and values 
of characters you type in. You can then compare the 
number you get to those printed in the rainbow. 
On longer programs, some benchmark lines are given. 
When you reach the end of one of those lines with your 
typing, simply check to see if the numbers match. 

To use Rainbow Check PLUS, type in the program 
and save it for later use, then type in the command RUN 
and press enter. Once the program has run, type NEW 
and press enter to remove it from the area where the 
program you're typing in will go. 

Now, while keying in a listing from the rainbow, 
whenever you press the down arrow key, your CoCo 
gives the check sum based on the length and content 
of the program in memory. This is to check against the 
numbers printed in the rainbow. If your number is 
different, check the listing carefully to be sure you typed 
in the correct basic program code. For more details 
on this helpful utility, refer to H. Allen Curtis' article on 
Page 21 of the February 1984 RAINBOW. 

Since Rainbow Check PLUS counts spaces and 
punctuation, be sure to type in the listing exactly the 
way it's given in the magazine. 

10 CLS:X=25G*PEEI<(35)+178 

20 CLEAR 25, X-l 

30 X=25G*PEEI< (35)+17B 

10 FOR Z=X TO X+77 

50 READ Y:W=U+Y:PRINT Z,Y;U 

G0 POKE Z.Y:NEXT 

70 IFW=79B5THENB0ELSEPRINT 

"DATA ERRDR":STOP 
80 EXEC X: END 

90 DATA 182, 1, 10G, 1G7, 140, G0, 134 
100 DATA 12G, 1B3, 1, 10G, 190, 1, 107 
110 DATA 175, 140, 50, 4B, 140, 4, 191 
120 DATA 1. 107, 57, 129, 10, 38, 38 
130 DATA 52, 22, 79, 158, 25, 230. 129 
140 DATA 39, 12, 171, 12B, 171, 12B 
150 DATA 230, 132, 38, 250, 48, 1, 32 
1G0 DATA 240, 183, 2, 222, 4B, 140, 14 
170 DATA 159, 1GG, 1GG, 132, 28, 254 
1B0 DATA 189. 173, 198, 53. 22, 12G, 
190 DATA 0, 135, 255, 134, 40, 55 
200 DATA 51, 52, 41, 



BIG BASIC 



Full Power for your CoCo 3! 
(From Danosoft) 

Gives up to 92K User Memory in 1 28K CoCo and 476K in 51 2K 
CoCo from BASIC with any mix of program/variables. You can 
have one BIG program or 58 Separate ones running at once 
from computer memory in multiple windows! Big Basic also 
allows you to Disk Chain any size program. Step up to the 
full potential of your CoCo 3 with Big Basic. Only $39.95 

51 2K Upgrades' 

Fully assembled, tested and ready to be shipped NOW! Our 
design allows mounting chips on top to prevent any heating 
problems. No soldering; Easy instructions for 2 minute instal- 
lation! Comes with following software (value $100): 

• 512KRamtest 

• 512K Backup Lightning 

• 512K Print Spooler 

• 512KRamdisk 

• OS9 Level II Ramdisk 
The absolute best 51 2K Upgrade Package Available! 
90 day warranty! New LOW Price $^03: 

OK Upgrade Board (with 51 2K Ramtest/Ramdisk/Spooler): $39.95 

Upgrades for CoCo 2 

64K Upgrade (8 chip) for CoCo I, CoCo ll's with Cat # 26- 
3026/3027/3134/3136: $29.95 

64K Upgrade (2 chip) for 26-3134 A/B CoCo II: $39.95 
(Free 64K Software included with 64K Upgrades) 




COMMUNICATIONS 
EXTRAVAGANZA 2400 

1(1) ZOOM 2400 Modem: Fully Hayes Compatible 300/120o| 
j/2400 w speaker, Auto Dial/Answer & Seven Year Warranty! | 
] (2) MODEM CABLE (4pin to DB25; Reg $19.95) 

(3) Autoterm Software (Reg $39.95) 

(4) Free CompuServe Offer & Access Time 



| (5) UPS 2nd Day Air Shipping 
Only $189.95 



Zoom 2400 Modem: $149 
Avatex 1200e Modem Only : $85 
Communications Extravaganza 1200: includes! 

Avatex 1200e modem w/ 2 Year Warn, cable, Compuserve| 
I Offer, software & 2nd Day Air Shipping. Only $129.95 




KEYBOARDS, ETC.. 

Keyboard Extension Cable allows you 
to move your keyboard away from the 
computer & type with ease. Use your ex- 
isting keyboard or leave your present 
keyboard intact and use a second 
keyboard. Only $39.95 
CoCo 3 Keyboard: $39.95 w/ Exten- 
sion Cable: $69.95 

CoCo 2 Keyboard: $19.95 w/ Extension Cable: $49.95 
(CoCo 3 Keyboard includes free Function Keys Software) 




EPROM .;! 



pnifimmfiffii ' 



INTRONICS EPROM PROGRAMMER: Programs 2516 to 

2701 & more! Includes software & complete documentation. 

Latest version. Lowest Price Anywhere. CoCo 1,2,3. Only] 

$137.95 

DATARASE Eprom Eraser: For 24/28 pin Eproms. Erases up| 

to 4 EPROMs at a time. Only $49.95 

Both Eprom Programmer & Eraser: $179.95 /!>""■"•«/ 

2764 Eprom: $8 27128 Eprom: $9 < _ 

ROMPAK (w/"Blank PC Board, 27xx Series): $12.95 
BLANK CARTRIDGE (Disk Controller Size): $10.95 



CABLES, Etc. 

I Magnavox 8505/851 5/8CM 643 Analog RGB Cable: $24.95 1 
Serial-to-Parallel Interface: Use your parallel printer at high! 
speed (300-9600 baud) with the CoCo. Comes with all cables. | 
No software compatibility problems. Only $44.95 
15" Shielded Multipak Extension Cable: $36.95 
Y Cable: Use your disk system with Speech/RS232 Pack,| 
DS69 Digitizer, etc. Only $27.95 iji 

RGB Analog Extender Cable: $19.95 
SONY Monitor Cable: $29.95 
MODEM Cable: 4 pin to DB25. Only $19.95 
2 Position Switcher: Hook 2 devices to serial port. $29.95 
HI-RES Joystick Interface: $11.99 



CHIPS, Etc. \^ 



(Needed for CoCo 3): $29.95 
68B21 Chip: $5.95 



Genuine RS Disk Rom 1.1 
ECB Rom 1.1: $29.95 
68B09E Chip: $14.95 
I GIME Chip for CoCo 3:$39.95 

Genuine RS Multipak PAL Chip (Specify 26-3024 / 26-3124): 
$19.95 

PAL Switcher: Allows you to switch between CoCo 2 & 3 
modes when using the Multipak. You need the OLDER & 
NEW PAL Chip for the 26-3024 Multipak. Only $39.95. With 
NEW PAL Chip Only $49.95 
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/fWPNWCROCOM SOFTWARE 2900 Monroe Ave, Rochester, NY 14618 |32i 
To Order: AH Orders $75 and above (except Printers, Monitors, Drives, Computers) shipped by UPS 2nd Day Air at no extra 
charge in Continental US. All orders $150 or above and Word Power 3.2 orders will receive a free T-Shirt till Dec 31, 1989.1 
We accept Visa, MC, Amex, Discover, Check, MO & School PO's. Please add $3.00 S&H ($10 for Drives) in Continental US; 
all others add 10% S&H (Min $5) NYS Residents please add sales tax. Our Australian Agent: Australian Peripheral Develop- 
ment. Ph: 07-341-9061. 

Credit Card Toll Free Orderline: 1-800-654-5244 (9AM-8PM 7 Days/week) 
Tech. Info (Between 4-8pm), Order Status, Info: 716-383-8830. Fax: 716-383-0026. 
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Simply the Best 



Alone, they're simply amazing. Together 
these two make an unbeatable team. CoCo 
Max III and Max-10: there's strength in 
numbers. Thousands of Color Computer 
enthusiasts the world over agree: this must 
be seen to be believed. CoCo Max has been 



used to draw so many pictures in Rainbow 
magazine that we've lost count of them all. 
And Max-10 is just the tool to write the 
thousand words that you know your CoCo 
Max picture is worth. 



Have a Super CoCo Christmas ! 




The Famous Graphics Creator 

fradi^ ..$49 95 
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Save $70 

BOTH 

CoCo Max III and Max-10for 

i ■ m ** $yg95 
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With these great bargains: 

Max-1 0:the Rolls-Royce of word processors. The only one with true 
graphic capability and dozens of type styles. Using your dot matrix printer 
you get from uny footnote* (6 point) to big titles (24 point). 

The Rainbow review (1/89) said: "An Incredible Job of providing 
power, flexibility and speed In a program that is as easy to use as It Is 
to pronouncel ... Max-1 takes a back seat to none, arid is beyond 
comparison with most." Max-1 0. the only word processor with "What 
You See Is What You Get". A word processor you will love at first sight. 

CoCo Max lll:,iow a classic and probably the most popular CoCo pro- 
gram ever. If the price was the reason that stopped you before, this special 
will delight you. Listen (Rainbow 3/88): "There are no limits to what you 
can do with this fabulous program. Speed, ease, animation, power and 
color, all In one package. CoCo Max III Is the ultimate program for the 
CoCo 3." Check any Rainbow (up to 4/89) for complete info on CoCo Max. 
To top it off. we include a free Demo Disk plus the super CoCo Show 
program, which lets you make your own "slide shows". 

Desktop Publishing:t gether, CoCo Max III and Max-10 form an 
unbeatable system for reports, flyers, invitations, greeting cards, signs, 
newsletters, etc. It's far beyond anything you've ever seen on a CoCo. 

Here is one of the hundreds of unsolicited letters we got: "Max-10 
and CoCo Max III are wonderful. They are the first Color Computer 
products I have purchased that were even better than I hoped for." 
At Colorware. we all work hard to make you feel that way and we 
thrive on your appreciation. 



C FREE CHRISTMAS BONUS 

Get any one of the "Add-Ons" below free with CoCo Max III or Max 10. 

Select one of these: Max Fonts, Max Edit, the Color Drivers, the Spellchecker. the Max-10 Fonts, or the Hi-Res 
Pack. If you get both Max-1 and CoCo Max III, select any two free add-ons! 



About Max-10 

What the CoCo Community needs is a word 
processor that's rock solid, blindingly fast, 
feels like a Macintosh, makes all the others 
look boring, and does not cost $80. 
Max-10 is just that and more. It allows on 
screen mixing ot graphics and text, large 
headlines, multiple columns and full page 
preview (with graphics), 
we swear that Max-1 will add excitement 
to your word processing, and that's no small 
taskl 
PRINTERS SUPPORTED: epson fx.mx.rx.i_x 

AND COMPATIBLES: DMP 105.106.110.130: CGP220 
(B&W). OKI 182.92.192: STAR NX-10, NX-1000. 

Max-10 Add-ons 

- Max-10 Fonts. 36 super tonts on 2 disks. 
Send for list. Order #C-23 $29.95 

NOTE: Max-10 and CoCo Max Fonts aren't intarchangable. 

- Spell Checker 50000 word dictionary for 
online spell checking and dictionary lookup. 
Perfect seamless integration with Max-10, 
Order #C-24 $29.95 

System Requirements 

Max-10 and CoCo Max III Require: any 
CoCo 3: 1 or more disk drives; joystick or 
mouse: Radio Shack Hi Resolution joystick 
interface: a video or RGB monitor or a TV. 



About CoCo Max III 

Whether you doodle for fun or do graphics 
for a living, CoCo Max will amaze you. It's a 
promise. 

Its major features Include: Huge picture 
area (2 full hi-res 320x1 92 screens). Large 
editing window. Zoom mode for detail work. 
28 point and click drawing tools. Shrink and 
stretch. Rotation at any angle (1 .5° steps). 
51 2K memory support (all features work 
with 128K too). Undo (Oops) feature to fix 
mistakes. Animation. Special effects. Color 
sequencing (8 colors, variable speed). 13 
fonts (more available). Each font has 8 sizes 
and 5 styles for thousands of possible 
combinations. Translate program to convert 
most types of pictures. CoCo Show "slide 
show" program. Miniload program to help 
use pictures with your software. Color edit- 
ing of patterns. Prints in single or double 
size. Select 16 of 64 available colors, all 64 
colors are shown at once for easy selection. 
Pull-down menus. 40 paint brush shapes. 
Two color lettering. Spray can. Amazing 
"flowbrush". RGB and composite monitor 
support. Colors print in 5 shades of gray. 
PRINTERS SUPPORTED: EPSON rx.fx.mx.lx 

AND COMPATIBLES: STAR/GEMINI NX-10.NX-1000: 
DMP 1 00. 1 05, 1 06. 1 1 0. 1 20. 1 30.200: OKI 82A. 1 82. 1 82: 
CGP-220|B8W) 

Color Drivers available. See next column. 



CoCo Max III Add-ons 

- Max Fonts disks. 95 fonts on 4 disks. 
Order #C-73 $49.95 

- Max Edit Create new fonts or edit existing 
ones. Order #C-16 $19.95 

- Color Printer drivers NX-1000 Rainbow, 
CGP-220 and Okimate 20. #C-2 $19.95 

CoCo Max I and II 

- CoCo Max I on tape. See previous ads or 
write for info. For CoCo 1 or 2. 

Order #C-7 $59.95 

- CoCo Max II. For all disk CoCos. Multi- 
pak or Y-Cable required. #C-85 $69.95 

Digitizers 

Digitize any picture from any video source 
(VCR. camera.,.) for use with CoCo Max III 
and Max-10. 
DS-69. Requires Multipak. 2 pictures per 

second. Order #C-18 $99.95 

DS-69B Faster: 8 pix/sec. #C-92... $149.95 



Call or Write Now 

(203) 348-9436 '{MJ 

Weekdays 9-5 EST y^m^, 



Ordering Information: We accept Visa. Mastercard, Checks and M.O. C.O.D. is $4 extra 
Purchase orders are subject to credit approval. Connecticut residents add 8% sales tax. 
Shipping: $4 per order (usually UPS ground). UPS 2nd Day Air: $4 extra. Next Day service 
available. Canada: $6 per order (Airmail). Outside U.S. & Canada: Add 10% of order total. 



Colorware 

[COLORWARE 242-W West Ave. 

Darien. CT 06820 



CoCo Consultations 



The Disk System That Lied 



by Marty Goodman 

Contributing Editor 



My FD-501 drive system has been infer- 
mittently, falsely telling me my disk is write- 
protected and refuses to write to the disk. I 
sent the controller and drive to Radio Shack. 
They tested it and said it was OK. What 
should I do? 

Douglas Paulson 
Richfield. Indiana 

Until the system "stays broken" and 
until it always gives you a WP Error, it may 
be tough to fix. However, there are some 
things you can try: Borrow another drive 
and controller, and run your CoCo with 
your controller but with another drive and 
cable. Then try it with yourdrive and cable 
but with another controller. See if the prob- 
lem occurs only in one combination of 
hardware, but not another. This allows you 
to narrow down the problem to which 
component it resides in. The problem could 
be a faulty write-protect sensor on the disk 
drive — perhaps cold solder connections 
for that sensor or dirty contacts for the 
cable. It could also be a defective cable or 
a bad junction between the cable and its 
connectors, or. less likely, a faulty chip or 
cold solder joint in the disk controller. 
Tracking down such intermittent problems 
requires a lot of time and patience — time 
that repair techs, who may charge $50 an 
hour, could only fix for several hundred 
dollars. 



Martin H. Goodman. M.D.. a physician 
trained in anesthesiology, is a longtime 
electronics tinkerer and outspoken com- 
mentator — sort of the Howard Cosell of 
the CoCo world. On Delphi, Marty is the 
SIGop of rainbow's CoCo SJG and data- 
base manager of OS-9 Online. His non- 
computer passions include running, moun- 
taineering and outdoor photography. Marty 
lives in San Pablo. California. 



Modem Vs. Printer 

I've been told on Delphi that it is impos- 
sible to write terminal programs that use 
the internal serial port with a modem at 
over 2400 baud and over 300 baud under 
OS-9. Yet I know a CoCo I or 2 can talk to 
a printer through the serial port at 9600 
baud, and a CoCo 3 can do so at 19,200 
baud. Why is the speed at which the inter- 



nal serial port can be used with a modem so 
different? 

Doug Fischer 

(COCONAUT) 

Hempstead. Maryland 

When the CoCo talks to a printer, data is 
flowing in only one direction — from the 
computer to the printer. It's true thai the 



GIME the Interrupts 



In the November 1989 issue we pub- 
lished the article "The OS-9 *CART 
Interrupt Fix," by Many Goodman. 
Shortly thereafter we received news from 
Tandy claiming the information in that 
article was untrue. According to Tandy, 
i.'ic GIME chip contains a very sophisti- 
cated interrupt handler utilizing a state- 
of-the-art interrupt polling methodology 
used by mainframes and real-time robotic 
control processors. By definition, an 
interrupt is an asynchronous process, 
meaning there is no way to determine 
when such an event will occur. There- 
fore, if you can't anticipate an event, you 
can't judge when to select a slot for the 
event to come in on. Instead, you must 
predefine the slot and make all interrupts 
channel through a single slot. 

The theory behind the GIME chip al- 
lows it to detect and react to simultane- 
ous interrupts from multiple sources with 
relative ease. When an interrupt is de- 
tected, the proper method of handling it 
is as follows: 

1. Read the GIME to find the source. 

2. Reset the GIME for next interrupt. 

3. Poll all potential interrupt devices. 

4. Return from interrupt. 



When you reset the GIME. any addi- 
tional interrupts are held in a pending 
state. If additional interrupts are gener- 
ated, they will either be picked up as you 
poll the device or become pending and 
will trigger an active interrupt as soon as 
you return from the current interrupt 
routine. With this technique, you can 
handle interrupts from multiple sources 
without performing any modifications to 
your system. 

The modification presented in the No- 
vember article merely provides a means 
of getting around a problem with OS-9 
Level H's intenupt-handling routines. A 
better solution is to use software that 
properly handles the interrupts. Tandy 
advises against any internal modifica- 
tions to the Color Computer 3 as this can 
cause failure to comply with FCC Class 
B specs, damage to the unit, and possible 
injury to the user. 

We will soon feature an in-depth ar- 
ticle in which we will cover the ins and 
outs of handling interrupts with the GIME 
chip and the methods used by OS-9 Level 
2 that differ from Tandy specifications. 



— RAINBOW Staff 
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printer communicates its busy status to the 
computer via a busy line, but the computer 
needs to check the status of that line to see 
if it is high or low. There is no interpretation 
of incoming serial data. This one-way 
communication is called half duplex, 

When using a terminal program with a 
modem, you need to be able to send and 
receive serial data at the same time. This is 
called/;*// duplex communication. Coding 
the serial port to do this is much trickier 
than coding it for outgoing half duplex 
communication. It takes more of the com- 
puter's processing time. Note that when the 
internal serial port is programmed to re- 
ceive data, this task is especially demand- 
ing of processor time — one has to poll the 
port (check it repeatedly) for new data all 
the time. 

The designers of the CoCo 3 realized 
that this polling made coding for the inter- 
nal serial port a problem, so they built a 
serial data input interrupt into the gime 
chip, intending the code to be interrupt- 
driven. and thus easier and faster. Also 
both the higher processor speed of the 
CoCo 3 and its internal timer allow for 
somewhat fasteroperation of the serial port 
on the CoCo 3 than is possible on the CoCo 
1 and 2. 

OS-9 Level 2 cannot support full duplex 
on the serial port because OS-9 is doing too 
many other things at once (as a multi- 
tasking system) to be able to devote con- 
stant attention to the serial port. Thus under 
OS-9. use of a hardware RS-232 port is 
required for full-duplex communication. 

Managing Memory 
/ have three questions: How does the 
memory management unit (MMU) of the 
CoCo 3 work? When you alter the contents 
of $FFA0 through $FFA7, why are you 
likely to crash programs running under 
BASIC or OS-9? What other registers are 
involved in memory management? 

Matthew James Randall 
Calgary. Alberta, 

The best technical references for the 
functioning of the MMU is Tandy *s service 
manual for the CoCo 3 and Spectral 
Associates' Super Extended BASIC Unrav- 
elled. (Both are available from rainbow 
advertisers.) Bit 6 of Register $FF90 en- 
ables the MMU. Bit 3 of SFF90 determines 
whether or not SXFEXX is constant or 



varied by the MMU registers. Bit of 
SFF91 is the task register select bit that 
selects between the memory scheme repre- 
sented by SFFAO through $FFA7 and the 
memory scheme represented by SFFA8 
through $FFAF. The first six bits of regis- 
ters SFFAO through $FFA7 represent what 
portion of the actual 128K or 5I2K of 
physical RAM will be mapped into the 
address space of the 6809 for Task 0. 
Similarly the first six bits of SFFA8 through 
$FFAF determine memory mapping for 
Task 1. Note that (though this is not docu- 
mented anywhere) the MMU registers have 
an effect not only on memory mapping but 
also on the mapping of the BASIC ROl 
More details are provided in the two refi 
ences I mentioned. 

Need to Make Some Repairs 

How do I go about fixing a Radio Shack 
disk controller? 

Duane Fair 
Joshua. Texas 



WD 1773 (28-pin) disk controller chip. 

Apart from these tips repairing the con- 
troller is like repairing any other electronic 
circuit: You get a schematic, examine it. 
then use test equipment to help find the 
trouble and fix it. 

Hooking Up Floppies 

Can I connect a 5'A-inch floppy drive to 
my CoCo as Drive and a 3'A-inch floppy 
drive as Drive I? 

Toby Johnson 
New Albany. Indiana 

Yes. Electrically 5!/>-inch 360K drives 
are identical to 3'/2-inch 720K drives. Your 
problems will be making proper data cables 
(the 34-pin connectors on the two drives 
are physically different, even though the 
lines are the same), making proper power 
connectors (3'/2-inch drives use a different 
type of power connector, even though they 
take the same voltages) and setting up the 
software to use both sides and all tracks of 



The most common 
problem with CoCo 
disk controllers is that 
the 74 16 or 7406 chip 
connected to the 
*HALT and *NMI 
lines go sour. Control- 
lers with this problem 
usually lock up the 
computer when 
plugged in. The cure 
is to desolder the de-. 
fective chip, replace 
it with a socket, and 
put a new 7406 in the 
socket. 1 suggest re- 
placing an old 7416 
with a 7406, which is 
a more rugged chip. 

Sometimes the 
problem is in other 
logic chips connected 
with the *HALT and 
*NMI circuitry. 
Rarely does the disk 
controller chip go bad. 
If it does, you can get 
replacement chips 
from Tandy National 
Parts. For the newer 
CoCo controllers. 
Disto/CRC offers the 



RGB-DOS Hard Disk Operating System $29.95 

Supports up to 16 Hard Drives. Runs Double Sided Floppy drives. 
Adds many new commands. Best compatibility with Basic and M/L. 
Works on any COCO. FREE Ramdisk for 512K COCO-3 included! 

OS-9 Hard Disk Drivers PLUS Hard Disk Boot $19.95 

Run your Hard Disk under OS-9 Level 2. Bool up OS-9 directly 
from Hard Disk, Supports up to 16 Hard Drives. FREE utilities. 

Ultra Basic 3 S19.95 

Adds many new commands and functions fo Ihe Color Compuler 3 
including support of Real Time Clocks such as the KEN-TON, DISTO 
and TANDY SmartWatch, RS Catalog H 25-1033 

20 Meg Hard Disk system, complete $629.95 

Fast, Reliable SCSI hard disk system. Complete, ready to run. 
No setup is required. Just plug and go. Completely Brand New 
components. No refurbs or scrap. Full manufacturers warranty. 
Supports your choice of Disk Basic. OS-9 or BOTH! 

30 Meg Hard Disk system, complete $669.95 

40 Meg Hard Disk system, complete $699.95 

Ken-Ton SCSI Hard Disk interface $89.95 

The only TRUE SCSI interface available for the Color Computer. 
Low power draw, very high speed. Compatible with Basic and OS-9. 
No multi-pack required. Jumper selectable options. 

Ken-Ton SCSI Interface PLUS RTC S119.95 

Same as above, with battery backed Real Time Clock, perfect for 
OS-9, Basic or a Bulletin Board System. 

Ken-Ton RS-232 Pack $74.95 

Direct replacement lor Tandy RS-232 pack. No multi-pack or 
software patches required. Very low power draw. Supports the 
TANDY SmartWatch Real Time Clock. Add Real Time to your BBS! 

Ken-Ton RS-232 pack. DUAL Channel $89.95 

Same as above, with two RS-232 ports. Perfect for OS-9, remote 
lerminals or multi-line Bulletin Board Systems. 

Please add $4 shipping per item. (Hard Drive Systems, add $20) 

RGB COMPUTER SYSTEMS 

294 Stillwell Avenue /S5\ 

Kenmore, N.Y. 14217 'ZnbS* 

Phone (716) 876-7538 "T,r°~ 
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the drives in question. Under OS-9 this is 
easy. Under Disk Extended Color BASIC 
(also called RS-DOS). I recommend buying 
ADOS or RGB DOS and burning it into an 
EPROM. Note that under Radio Shack's 
Disk BASIC you must define one side of a 
double-sided drive as one virtual drive and 
the other side of it as a different virtual 
drive. 

Memory Upgrade 
How do I upgrade a CoCo 2 Model 26- 
3134ro64K? 

James L. Fisher 
Laurel. Missouri 

I suggest reading an article I wrote in the 
March 1989 issue of the rainbow called 
"Upgrading the Color Computer's Mem- 
ory" (Page 34). To upgrade that model of 
computer, you need eight 41 64-type DRAM 
chips (-20 or -15 speed). Just replace the 
eight socketed 16K-by-l RAM chips with 
those eight 64K-by-l DRAM chips, and 
solder the two 64K jumper pads located in 
the front left part of the motherboard to 
each other. You may have to upgrade the 
ROM to go from Color BASIC to Extended 
Color BASIC. Several rainbow vendors 
sell the needed Extended basic chip. My 
article describes exactly what chip to get 
and how to install it. Before you do all these 
things, you might want to look for a 64K 
CoCo 2 at local flea markets. Often these 
used machines sell for less than the cost of 
Ihe individual parts needed to upgrade a 
16K machine. 

McGinnis Asks About Bradley 

Can I use an Allen Bradley Cat. No. 
L1745-MC EPROM memory module with 
a 512K Color Computer? 

B. McGinnis 
Wentzville. Missouri 

Probably not. Only EPROMs specifi- 
cally designed electrically for the Color 
Computer with programs specific to the 
Color Computer will work with it. 

Downloading With the DCM Pak 

How can I download with my Direct 
Connect Modem Pak, CoCo 2, disk drive 
and Multi-Pak? I have Videotex Software. 

Wes Day 
Willard. Missouri 

You can use the DCM Pak with other 
software, such as MikeyTerm. The Vide- 
otex software is worthless for download- 
ing, as is the internal software in the DCM 
Pak. MikeyTerm can be ordered for $10 
from its author. Mike Ward, at 1807 Cortez, 
Coral Gables. FL 33 134. Once it is up and 



running, you will find other CoCo 2 termi- 
nal programs for downloading. 

I also suggest reading "Working To- 
gether: Delphi and Tape I/O" by Don 
Hutchison on Page 1 56 of the August issue. 
It discusses how to download with the Di- 
rect Connect Modem Pak. 

Finally, if you plan on doing much 
downloading, let me advise you to get rid of 
the DC Modem Pak and invest in a 1 200- 
baud modem. 

Looking for an Address 
I'm having trouble finding the end ad- 
dress of disk-based machine language 
programs. I need this to hack up some disk 
programs to tape. 

Donald Kempton 
Athens, Ohio 

The end address is not stored in memory 
when you load a disk-based machine lan- 
guage program into memory. Rather, it is 
determined by the length of the program. 
Some programs in the rainbow assist 
with the transfer of machine language pro- 
grams from tape to disk and disk to tape, 
such as the one found in the article. "The 
Limosine Utility: A Tape to Disk Transfer 
Vehicle" by Roger Schrag (RAINBOW, 
February 1987. Page 73). In any case it is a 
waste of time to back up disks to tape. The 
sensible way to back up information on a 
floppy disk is to put that information onto 
another floppy disk. There is no advantage 
to using tape. 

Cabinet Query 

/ was trying to add a second disk drive to 
my FD-502 Radio Shack disk drive cabinet , 
but the power supply connectors used on 
the FD-502 drive inside the cabinet are 
non-standard. What should I do? 

Walt Jones 
Georgetown, Delaware 

I believe the power connector used by 
the FD-502 5'/i-inch drive is actually the 
same as the standard power connector for 
3'/>inch disk drives. In any case disk drives 
require regulated +5, regulated +12 volts 
and ground. You need to buy a standard 5 [ A- 
inch-drive-type. Amphenol 4-pin female 
connector (the type used to hook to the 
power connector of most older 5'/i-inch 
drives). Cut off the old connector that came 
on the FD-502 system for its spare drive, 
and solder the wires to the normal Amphe- 
nol power connector. Radio Shack does not 
sell such connectors, but many other elec- 
tronic supply houses do. Try Jameco in 
Belmont. California, or JDR in San Jose. 

Be sure to hook the power up correctly. 



The two middle wires are ground. If you 
look at the standard female power connec- 
tor (the one that will plug into the drive) 
head on (into the end that mates with the 
connector on the drive), it must be wired as 
follows: 




Use a voltmeter to be sure of the voltages on 
the wires coming from the FD-502' s power 
supply. 

How Compatible is Commodore? 

Is it possible to hook up a Commodore- 
compatible printer (one with a six-pin se- 
rial port) to a Color Computer 3' s built-in 
serial port? 

Wayne Smith 
Winnipeg, Manitoba 

No. The Commodore computers use a 
non-standard serial port operating at differ- 
ing voltage levels from those of the CoCo 
3 (which are within the industry standard 
for RS-232 signals.) Offhand I know of no 
commercially available converters. A hacker 
might try to rig up something using 1488 
and 1 489 level converter chips or a MAX232 
level converter chip, assuming there are no 
other incompatibilities (such as timing). 

Do I Have 64K Memory? 

/ have a Radio Shack Color Computer 2 
with Extended Color BASIC. How much 
memory do I actually have? What chips do 
I need to upgrade my CoCo 2? 

Sabine Foulds 
Quadra Island. British Columbia 

Most CoCo 2s with Extended Color 
BASIC come with 64K. After powering up 
the computer, type print mem and press 
ENTER. If the result is 22823 with a disk 
controller plugged in or 24871 without a 
disk controller plugged in, you have a 64K 
machine. BASIC is able to use less than half 
the total amount of RAM in a 64K machine 
for its programs and data. 

Many commercial and shareware pro- 
grams, however, use all of the 64K avail- 
able RAM. If you get a much smaller 
number as free memory, you can upgrade 
your machine to 64K. The exact procedure 
and chips required vary with the particular 
issue of CoCo 2. 1 gave a complete guide to 
all such upgrades on Page 34 of the March 
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<« GIMMESOFT >» 

A new generation of Color Computer products 



.MostarCord 



V-Term Terminal 

■Vox, Unix, Mainframe, and BBS systems 
•Vt-100, Vt-52, Vldtex & Ascll emulations 
•Serial port to 2400, RS-232 to 19,200 baud 
•XModem, XModera-CRC, YModem, ASCII 
•15 entry autodial, 10 programmable macros 
Disk (128k or 512k CoCo 3 only) .... $39.95 

Telepak II rs-232 

A Truly Compatible RS-232 Interface) 
It comes with a 3 foot DB25 cable, gold edge 
contacts, and low power drain (5v) components. 
Telepak II & Manual $49.95 




Xport 3$%- 

The replacement for the Multi-Pak 
Interface is here! Xport is just that, an 
extended port interface that is buffered 
(unlike a Y-Cable), has 3 ports (2 
switchable), and has it's own 12v 
supply for those devices that require 
it. Xport is made with the same 
quality & workmanship as Telepak II 

Xport and Manual $74.95 



Turbo 512k Ram 



■^'\fi'¥^\^ 



-Fully assembled and tested board 

-Premium 120ns 256x1 memory chips 

-Easy to follow instructions Jr>T ~T* TTr 

-Fast and easy installation OlUCilO WOrkS 

-Complete With 512k software Digital Audio Sampler 

-Ram Disk, RamTest, & Print Spooler 

Holiday Sale Price > > > $89.95 
0k board w/software ... $34.95 




Studio Works 

A totally professional Digital Audio Sampler 
that Is second to nonel Studio works features 
point & click, cut & paste, overlay, reverse, 
volume control, sequencing, compression and 
much much more. Samples up to 17k/second. 
W/O cable - $38.95 W/cable - $53.95 

Soundtrax 

The perfect partner for Studio Works! Soundtrax 
is a sound sequencing system that imports 
digitized audio samples & provides total control. 
For CoCo 3, mouse/joystk, & disk .... $34.95 



Warrior King $29.95* 

Kung-Fu Dude $24.95 

In Quest of the Stafford $34. 95' 
Hint sheet for Starlord $3.95 

Pyramix $19.95- 

Hall of the King 1 2 or 3 $29.95 

Dragon Blade $19.95 

White Fire of Eternity . $19.95 
Champion $19.95 

• CoCo 3 only 

Multi-Label W Version 2.00 

This latest version of Multi-Label III 
now prints labels one, two or three 
across! Comes configured for most 
Tandy and Epson printers .. $16.95 
Upgrades to Version 2.00 .. $6.95 

Fkeys III (Co co 1.2, 3) $19.95 

Easy to use, DOS mods, 20 function keys 

Sixdrive (Co co 1,2, 3) $16.95 

Use up to 3 d/s drives as SIX single sides. 

Toll Free 

Free 2ND AIR from Midwest to California 

Orders: 9am to 9pm Eastern tune 

On-line orders: Delphi's CoCo Sig 

Inquiries & technical assistance: 7pm to 9pm: 



Games 




Kyum-Gai: to be Ninja 

Kyum-Gai: to be Ninja uses the most detailed 
320x200 resolution, 16 color graphics, the 
highest quality digital sound effects, and 
spectacular animation to bring you the greatest 
martial arts game your CoCo 3 has ever seenl 
For CoCo 3, Joystick, & disk $29.95 

Paladin's Legacy $24.95 

You will love the feeling of playing an action 
game with great graphics, animation, and sound 
effects, but all the while solving one of the most 
involved adventures yetl CoCo 1,2, or 3 & disk. 

Sinistaar 512k CoCo 3 .. $34.95 

Experience the fast-paced action of 512k packed 
with spectacular graphics and sound effects! 




MPI-CoCo Locking Plates 

This money saving device is now 
available for the CoCo 2 and 3! It is 
important when ordering to specify 
CoCo 2 or CoCo 3 and MPI 26-3024 or 
MPI 26-3124. Only $7.95 

SuprfUe HI (CoCo 3 only) ... $29.95 
Easy to use, multi-purpose database. 

BidWriter ( P c/xt/at only ) ... $49.95 

Create and print professional proposals. 



1-800-441-GIME 



Order line 



GIMMESOFT 
P.O. Box 421 
Perry Hall. MD 21128 
301-256-7558 



Add $3.00 for shipping and handling 
Add $3.00 for COD (USA only) 
MD residents add 5% sales tax 
VISA/MC/Check/Money Order/COD 



1989 issue of THE rainbow. 

New Drives, Old Case 

What are the power requirements jbr 3'A- 
inch drives, and will they fit in an old Radio 
Shack full-height case? Could the power 
supply in that case drive both of them 
without being overloaded? 

Doug Fischer 
Hempstead, Maryland 

3'/:-inch drives require regulated +5 and 
+ 1 2 volts. Just like 5',4-inch drives, they tend 
to draw somewhat less current on both of 
those lines, especially when compared to 
the ancient full-height 5'/i-inch klunkers. 
This is due to the use of LSI circuitry and 
more efficient motors. The exact power 
requirements vary a bit from brand to brand, 
and there are several different power sup- 
plies used in old RS full-height drive cabi- 
nets, so I cannot give you a precise answer. 
It seems likely that the power supply de- 
signed to drive a single full-height 5'/i-inch 
drive will drive two 3'/>-inch drives. You 
need adapters for the power connectors, 
though, because 3'/>inch drives use a differ- 
ent connector for their power supply. 
Adapters going from a 5'/i-inch drive power 
connector to 3!/2-inch-type power connec- 
tors are sold by JDR Microdevices of San 
Jose, California. The 3'/>inch drives also 
use different data connectors, though the 
required connector is sold by Radio Shack 
stores. The data and control lines are iden- 
tical to those of comparable 5'/i-inch drives. 
There is far less standardization of size and 
mounting hole positions with 3'/2-inch drives, 
so you will probably have to drill custom 
mounting holes and use metric screws to 
mount the drives. Many 3'/2-inch drives are 
half-height (by the old 5'/i-inch standards), 
but some are third-height, especially those 
intended for mounting in laptop/portable 
computers. You might want to use a bit of 
black plastic "or paper to plug the hole 
between the drives and the top of your old 
case at the front of the case. 

CoCo With DOS on It 

Can I rim MS-DOS programs on a CoCo? 
Can I use a DC Modem Pakfor download- 
ing ASCII graphics? 

Reuben Rivas 
Ontario. California 

Generally speaking, you cannot run 
programs written for MS-DOS systems on 
a Color Computer. The CoCo uses a differ- 
ent central processor and different operat- 
ing system and has utterly different key- 
board and screen characteristics from MS- 



DOS machines. Usually the DC Modem 
Pak is a bad choice for any sort of telecom- 
munications. If you have one, don't use the 
program that comes with it, but get other 
terminal programs to use with it. such as 
MikeyTerm. (See my response to James 
Fisher for more information.) 

With MikeyTerm you can download other 
shareware terminal programs from Delphi. 
Or as you become more skilled at using 
such programs, you may prefer to buy one 
of the excellent and relatively inexpensive 
commercial CoCo terminal programs like 
V-term (for the CoCo 3) or Autoterm. 

Attention, All 40-Tracks 

How can 1 address all 40 tracks (not just 
the first 35) of my FD-501 drives under 
Disk BASIC ? Is there some simple poke 1 can 
use with Disk BASIC in the all-RAM mode? 
What about 80-track drives and bard drives? 
Timothy G. Fitltz 
Summerville. South Carolina 

There is no simple modification orpoke 
to convert to a greater number of tracks. 
But alternate DOSs such as ADOS and 
RGB-DOS give you the option of using 
higher-capacity drives. These DOSs can be 
burned into an EPROM and substituted for 
your Disk BASIC ROM once you have cus- 
Jomized them to your liking. For general 
information about hard drives, I encourage 
you to read "A Hard Drive for Your CoCo" 
(March 1989. Page 44). 

Mixing CoCo with Apples? 

Can I use programs written in Apple 
BASIC on a CoCo? 

Alan Pilon 
Brossard, Quebec 

basic on all microcomputers is similar 
but not identical. It is very unlikely that a 
program of any complexity written in BA- 
SIC for one type of computer will run with- 
out modification on another. The main 
problems tend to be due to the fact that the 
graphics display capabilities of personal 
computers are quite different. Hence, pro- 
grams with graphics display (as opposed to 
text-only display) often require consider- 
able rewriting when being ported over to 
another type of computer. 

Maybe If I Took It to an Arcade 

Is there anything I can do to a CoCo to 
enable it to play Nintendo games? 

RolfSchlup 
Beattsejour, Manitoba 

There is no way to make a CoCo directly 



compatible with Nintendo cartridges. The 
two machines are different in almost every 
aspect of theirdesign. However, you might 
see Nintendo software written for ROM 
Paks for the CoCo. 

Alignment Problems 

/ just installed a second, double-sided 
disk drive in my FD-501 case along with 
the original FD-501 single-sided drive. It 
seems to work, but disks formatted and 
written with it cannot be read on the origi- 
nal drive and vice versa. What is going on 
here? Also, how can 1 address the other 
side of this double-sided drive? 

Jason A. Weinstein 
Martinez, Georgia 

It sounds like one or both of the disk 
drives have serious head alignment prob- 
lems. The two drives are writing tracks in 
somewhat different places on the disk, so 
one cannot read what the other has written 
and vice versa. Both need their alignment 
checked and adjusted. This requires an 
alignment disk, either an oscilloscope or a 
digital alignment adjustment program such 
as Memory Minder by J&M systems of 
Albuquerque, and some experience with 
aligning disk drives. As for accessing the 
back side of the drive, I recommend 
purchasing ADOS from SpectroSystems. 
Among many other things ADOS gives 
access to the back side of double-sided disk 
drives under Disk BASIC. 




Your technical questions are wel- 
comed. Please address them to CoCo 
Consultations. THE RAINBOW, P. 
O. Box 385, Prospect, KY 40059, 

We reserve the right to publish 
only questions of general interest and 
to edit for brevity and clarity. Due to 
the large volume of mail we receive, 
we are unable to answer letters indi- 
vidually. 

Questions can also he sent to Marty 
through the Delphi CoCo SIG. From 
the CoCo SIfJ> prompt, pick Rain- 
bow Magazine Services. Then at the 
RAINBOW> prompt , type ask (for 
Ask the Experts) to arrive at the 
EXPERTS> prompt , where you can 
select the "OoCo 

Consultations" online form, which has 
complete instructions. 
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Free VIP Disk-ZAP With Every Order! 



VIP Writer-VIP Writer III 

VIP Writer III offers screen widths of 32, 40. 64 & 80 - all with 24 lines and actual lower 
case letters using the CoCo 3's hardware display. It runs at double clock speed and has 4- 
color menus making VIP Writer III FAST and EASY to usel You can choose foreground, 
background, hilite and cursor colors from up to 64 hues. Color can be turned ON or OFF 
for the best possible display using a monochrome monitor or TV set. VIP Writer III has a 
context sensitive help facility to display command usage in easy to read colored windows. 

CUSTOMIZER & PRINTER INSTALLER 

VIP Writer III comes with a configuration / printer installation program which lets you 
customize VIP Writer III to suit your own liking. You can set screen width and colors as well 
as margins and more. You can also install your own printer and set baud rate, line feeds, 
etc. Once done, you never have to enter these parameters again! VIP Writer III will load n' 
go with your custom configuration every time! 

MORE TOTAL TEXT STORAGE 

VIP Writer III has 106K total text storage in a 128K CoCo 3 (495K in 51 2K). VIP Writer 
III creates ASCII text files which are compatible with all other VIP Programs as well as 
other programs which use ASCII files. You can use VIP Writer III to even type BASIC 
programs] There is a 48K text buffer (438K in a 51 2K CoCo 3) and disk file linking 
allowing virtually unlimited text space. VIP Writer III works with up to four disk drives and 
lets you display directories and free space as well as rename or kill disk files. In addition 
VIP Writer III is 100% compatible with the RGB Computer Systems Hard Disk. 

POWERFUL EDITING FEATURES 

VIP Writer III has a lull featured screen editor which can be used to edit lex! with lines up 
to 240 characters long with or without automatic word wrap around. You can select 
type-over mode or insert mode. There is even an OOPS command to recall a cleared text 
buffer. Othor editing features include: Type-ahead • typamatic key repeat and key beep 
for flawless text entry • end of line bell • full four way cursor control with scrolling • top 
of textfile • bottom of textfile • page up • page down • top of screen • bottom of screen • 
beginning of line • end of line • felt one word • right one word • DELETE character, to 
beginning or end of line, word to the left or right, or entire line • INSERT character or line 
• LOCATE and/or CHANGE or DELETE single or multiple occurrence using wildcards • 
BLOCK copy, move or delete with up to TEN simultaneous block manipulations • TAB key 
and programmable tab stops • word count • line restore ■ three PROGRAMMABLE 
FUNCTIONS to perform tasks such as auto column creation and multiple copy printing. 



AUTOMATIC TEXT FORMATTING 

VIP Writer III automatically formats your text for you or allows you to format your text in 
any way you wish. You can change the top, bottom, left or right margin and page length. 
You can set your text Hush left, center or flush right. You can turn right hand 
justification on or off. You can have headers, footers, page numbers and TWO auxiliary 
lines which can appear on odd, even or all pages. You can also select the line on which they 
appearl You can even change the line spacing! Parameters can be altered ANYWHERE I 

PREVIEW PRINT FORMAT WINDOW 

VIP Writer III features an exclusive lormat window which allows you to preview your 
document BEFORE PRINTING IT! You are able to move up, down, left and right to see 
centered and justified text, margins, page breaks, broken paragraphs, orphan lines etc. 

PRINTING VERSATILITY 

VIP Writer III prints TWICE as fast as any other CoCo word processorl It supports most 
printers and gives you the ability to select baud rates from 1 10 to 19,200. You can imbed 
printer control codes anywhere in your text file EVEN WITHIN JUSTIFIED TEXTI VIP 
Writer III also has TWENTY programmable printer macros which allow you to easily 
control all of your printers capabilities such as bold, underline, italics and superscript 
using simple key strokes. Other features include: multiple copy printing • single sheet 
pause • line feeds. 

BUILT IN PRINT SPOOLING 

VIP Writer III has a print spooler with a 57.000 character buffer which allows you to print 
one document WHILE you are editing another. You don't have to wait until your printer is 
done before starting another jobl VIP Writer DOES NOT include this feature. 

50,000 WORD SPELLING CHECKER 

VIP Writer III includes VIP Speller (not FREEWARE) to check your text for misspelled 
words It has a 50,000 (not 20,000) word dictionary that can be added to or edited. 

QUALITY DOCUMENTATION 

VIP Writer III comes with a well written 125 page manual which is Laser printed, not dot- 
matrix like the competition. It includes a tutorial, glossary of terms and examples for the 
beginner as well as a complete indexl VIP Writer III is truly the BEST you can buy. 
VIP Writer III includes VIP Speller DISK $79.95 

' VIP Writer for CoCo 1 & 2 includes VIP Speller DISK $69.95 



VIP Writer owners: Upgrade to the Writer III 2.0 for $49.95 + $3 
S/H. Send original disk and $52.95 total. 



VIP Database III 

VIP Database III features selectable screen displays of 40, 64 or 80 characters by 24 
lines with choice of 64 foreground, background, hilite and cursor colors for EASY DATA 
ENTRY. It uses the CoCo 3's hardware screen and double clock speed to be the 
FASTEST database availablel VIP Database III will handle as many records as will fit on 
your disks and is structured in a simple and easy to understand menu system with full 
prompting for easy operation. Your data is stored in records of your own design. All files 
are fully indexed for speed and efficiency. IN-MEMORY SORT of records is LIGHTNING 
FAST and provides for easy listing of names, figures, addresses, etc.. in ascending or 
descending alphabetical or numeric order. Records can be searched (or specific entries 
using multiple search criteria. The built-in mail-merge lets you sort and print mailing lists, 
print form letters, address envelopes - the list is endless. The built-in MATH PACKAGE 
even performs arithmetic operations and updates other fields. VIP Database III also has a 
print spooler and report generator which uses print forms you create. DISK $69.95 
• VIP Database for CoCo 1 and 2 DISK $49.95 



VIP Calc m 



VIP Database owners: Upgrade to the VIP Database III for 
$39.95 + $3 S/H. Send ORIGINAL disk and $42.95 total. 



FAST 4-color POPUP menus • PRINT SPOOLER 
32, 40, 64 and 80 Column HARDWARE display! 
Runs VERY VERY FAST at double clock speed! 

Now every CoCo 3 owner has access to a calculating and planning tool better than 
VisiCalc™, containing all its features and commands and then some. VIP Calc III allows a 
large worksheet with up to 51 2 columns by 1024 rows! In addition, VIP Calc III has up to 1 6 
windows which allow you to compare and contrast results of changes. Other features 
include 8 AND 16 digit precision • trigVjUnctions • averaging • algebraic functions • column 
and row ascending and descending SORTS • locate formulas or titles in cells • block move 
and replicate • global or local column width • limitless programmable functions • create 
BAR charts. Embed printer control codes for customized printing. Combine spreadsheet 
data with VIP Writer documents to create ledgers, projections, statistical & financial 
budgets and reports. DISK S6935 

• VIP Calc for CoCo 1 and 2 DISK S59.95 



VIP Library $149.95 

The VIP Library lor the CoCo 1 and 2 combines all six popular VIP application 
programs - VIP Writer, Database, Calc, Speller, Terminal and Disk-ZAP - into 
one program on one disk called VIP Desktop. Incluides 430 page manual. 
For VIP Library shipping please add $4 USA. $5 Canada. $20 Foreign. 

VIP Library /WDCE $179.95 

The VIP Library /WDCE (Writer Database Calc Enhanced) combines all six popular VIP 
application programs - VIP Writer III, Database III, Calc ill, Speller, Terminal and Disk- 
ZAP - into one program on one disk called VIP Desktop. 
For VIP Library shipping please add $4 USA. $5 Canada. $20 Foreign. 



VIP Calc owners: Upgrade to the VIP Calc III for $29.95 + $3 S/H. 

Send original disk and £32.95 total. 



VIP Library owners: Upgrade to the VIP Library AA/DCE for $99.95 
+ $3 S/H. Send ORIGINAL disk and $1 02.95 total. 



SD Enterprises info line (805) 566-1317 
PO Box 621 Carpinteria, Ca. 93013 

Non VIP Library orders add $3 for shipping and handling in USA. Canada $4. Foreign 

$6. COD orders add an additional $2.75. Checks allow 3 weeks for delivery. 

California residents add 6% sales tax. ' CoCo 1 & 2 versions support 51 . 64 and 85 Cols. 



VIP Library Trade up offer!! 

Trade in any VIP Product and get VIP Library for 

only $99.95 plus shipping!! 

-OR - 

Trade in VIP Writer III, VIP Calc III or VIP 

Database III and get VIP Library /WDCE for only 

$99.95 plus shipping!! 

Just send in the original diskette only (do not send the manual) and 
$99.95 plus shipping to receive your very own VIP Integrated Library. 

SD Enterprises credit card / COD order line. 

1-800-322-9873 



Feature 



A keyboard supercharger that helps make CoCo user-proof 



Harness Those Keys 



by Mike Dalene 
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Have you ever wanted to write a game 
or word processing program? If so, 
you know how frustrating it can be when 
your computer has a BREAK key that halts 
everything you do. Even the best program- 
mers and users press it by accident. I expe- 
rienced a similar problem and so iried to 
figure out how to turn off and redefine the 
break key. KeyEdil provides a simple but 
powerful way to shut off the BREAK key and 
any of the keys in Figure I. 

How It Works 

Through the BASIC machine language 
loader at the beginning, this program puts 
the ROM data into RAM. then looks at the 
keyboard table for the "control"' keys shown 
in Figure I. It lets you redefine them for 

Mike Dalene uses BASIC and OS-9 on his 
CoCo 2. He is currently studying COBOL, 
FORTRAN andC. while living at home. 
He max be contacted at 39 Up- 
land Rd.. Whtsted. CT 06098, 
(203) 379-0178. 



your own uses. For example, when I wrote 
this program. I changed the shifted left 
arrow to 8 instead of the original 21. That 
way I could not erase the entire line if I 
pressed SHIFT and the left arrow. (Instead, 
it now only deletes like the unshifted key.) 
The program is very easy to use and 



Up Arrow 


SHlFT-Up Arrow 


Down Arrow 


siiiFT-Down Arrow 


Left Arrow 


SHIFT-Left Arrow 


Right Arrow 


SHIFT-Right Arrow 


Space Bar 


SHIFT-Space Bar 





SHIFT-0 


ENTER 


SHIFT-ENTER 


CLEAR 


SHIFT-CLEAR 


BREAK 


SHIFT-BREAK 


@ 


SHIFT-@ 




Figure 1 jr 



should not take too long to understand. 
Most of the commands are||jmple, although 
they may look awesome at first. KeyEdil is 
written in the form of subroutines, and it ac- 
cesses these from the main menu. Most of 
the routines do not 
require much 
e x p I a n a - 
lion. 



except for the Edit Keycodes and Print 
New Codes opiions. Edit Keycodes uses 
some strange-looking CHR$ values for the 
cursor key controls. I wrote il like this 
because some users may have defined the 
cursor keys for values other than the origi- 
nal defaults. The values are obtained from 
the key redefinition area of memory instead 
of assuming their original values. These are 
the lines, with explanations as follows: 

290 checks for up arrow 
295 checks for SHlFT-down arrow 
297 checks for SHlFT-up arrow 
300 checks for down arrow 
330 checks for ENTER 

All of these codes are in the table starling ai 
4 1 582 and ending at 4 1 601. 

The Print New Codes section has none 
of the confusing codes, but the printer 
configuration codes may need to be changed. 
They were supposed to configure the Big 
Blue prinler for auto-linefeed, since the 
CoCo only sends carriage returns to the 
printer. Therefore, in Line 410 you can 
delete the PRINT-#2 or replace my codes 
with your own. Line 10 sets the serial port 
at 1200 baud; you may need a different 
baud rate so check your prinler or interface 
manual for the proper rate. 

Load the listing from disk and iypc RUN. 
The menu of six choices is displayed as 
follows: 




\ 



(1) 


EDIT KEYCODES 


(2) 


PRINT NEW .CODES 


(3) 


SAVE NEW CODE TO DISK 


(4) 


LOAD FILES 


(5) 


PLACE DATA IN MEMORY 


(6) 


EXIT 




Selecting 1 places you in the editor. Use 
your up. down and SHlFT-up and -down 
keys to select one of the keycodes appear- 
ing at the top of the screeen. The shifted 
keys quickly bring you to the top or bottom 
of the list. Once you find the key you want 
to change, press ENTER. The name of [he 
key and the code are shown, and you are 
asked to enter a new code. Pressing only 
ENTER sets that key at and makes it 
completely useless unless you change il 
again. Your new codes do not become 
active until you select 5 from the main 
menu. Once you have made changes, press 
ENTER. The computer asks if you want lo 
make more changes. Pressing N returns 
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you to the main menu, where you can 
perform another operation such as saving 
your work to cassette or loading other work. 
LOAD and SAVE allows you to save the 
work in two forms: text and binary. Most of 



Suppose you want to use BREAK to return to 
a menu and you have set it up as a value of 
128. All you have to do is have the com- 
puter check to see if CHR$(128) has been 



entered. If so, go to your menu. It's that 
simple. However, do not press reset or 
you will have to reload the ROM-to-RAM 
loader again. □ 




the rime you want text. But when all your 
code is ready, save it in binary form for later 
use without the editor. I have tested the 
SAVE and LOAD binary commands under the 
editor, and it seems to work fine; however, 
you must have the ROM-to-RAM section 
in lines 20 through 70 already in memory to 
allow you to use your predefined codes. Of 
course. CoCo 3 users don't need this por- 
tion of the code as the CoCo 3 is always in 
the all-RAM mode. 

Cassette Modifications 

To be able to load and save the redefined 
codes with cassette, make the following 
changes: 

210 PRINT"(3) SAVE NEW CODES TO 

DISK" 

490 CSAVEMF$. 41582. 41601. 8HB4F4: 

RETURN 

500 0PEN"0".#-1.F$:F0RC=1T020:PR 

INT#-1.A$(C).X(C):NEXTC:CL0SE#-1 

: RETURN 

580 CL0ADMFS: RETURN 

590 0PEN'T\#-1.F$ 

610 INPUT #-l.A$(C).X(C) 

620 NEXT:CL0SE#-1:RETURN 

Using Your New Codes 

You can use your new codes from basic 
simply by using INKEY$ and checking for 
the new codes placed in a CHR$ function. 



64K Disk 









/ 


.... 129 


V/f 110 


I 220 


71 

30 




300 




435 


.... 228 




530 


.... 252 




END 


.... 229 



The listing: KEYEDIT 

"COPYRIGHT 1989. FALS0FT INC. 

10 POKE150.41-SET PORT FOR 1200 
BAUD 

11 "KEYEDIT V.l 

12 "WRITTEN BY MIKE DALENE 

13 "MARCH 14.1988 

20 REM ROM TO RAM TRANSFER 

30 FORX-32000 TO32025:READA:POKE 

X.A:NEXTX:EXEC 32000 

40 DATA 26.80.142.120.0.236.132 

50 DATA 183.255.223.237.129.183 

60 DATA 255.222.140.254.255.37 

70 DATA 241.183.255.223.28.175.5 

7 

80 REM REDEFINE SOME OF THE KEYS 

AS LISTED BELOW IN DATA STATEME 
NTS NEXT TO NEW VALUE 
90 DATA[UP],[SH] [UP] . [DN] . [SH] 
[DN].[LF].[SH] [LF].[RT].[SH] [R 
T] 
100 DATA [SPCLCSH] [SPC].0.[SH] 

0. [ENTER], [SH] [ENTER]. [CLR].[S 
H] [CLR].[BRK].[SH] [BRK].@.[SH] 

@ 

110 DIMA$(20).X(20) 
120 FORC-1TO20:READA$(C):X(C)-PE 
EK(41581+C):NEXTC:CLS:PRINT"I AM 

DONE ENTERING THE DATA." : F0RG-1 
T025:NEXT:G0SUB 170 
130 "JUMP TO PARTS OF PROGRAM 
140 IFA$-"6" THEN510 
150 ON VAL(A$) G0SUB 270.410.435 
.525.640 

160 G0SUB 170:GOTO140 
170 REM DISPLAY MENU 
180 CLS:PRINTTAB(8):""MENU OF CH0 
ICES" 

190 PRINT"(1) EDIT KEYC0DES" 
200 PRINT"(2) PRINT NEW CODES" 
210 PRINT"(3) SAVE NEW CODES TO 
DISK" 

220 PRINT"(4) LOAD FILES" 
230 PRINT"(5) PLACE DATA IN MEMO 
RY" 

240 PRINT"(6) EXIT PROGRAM" 
250 A$-INKEY$:IF A$<"1" OR A$>"6 
" THEN 250 
260 RETURN 

270 CLS:PRINT"C0NTR0L KEYC00E ED 
IT0R ENABLED" 
280 A-l 
285 A$-INKEY$ 
290 IFA$~CHRS(PEEK(41582)) THEN 



A-A- 1 

295 IFA$-CHR$(PEEK(41585)) THENA 

-20 

297 IFA$-CHR$(PEEK(41583)) THENA 

-1 

300 IFA$-CHR$(PEEK(41584)) THENA 

-A+l 

310 IFA<1THENA-1 

320 IFA>20 THENA-20 

330 IFA$~CHR$(PEEK(41594)) THEN 

350 

340 PRINT@32.A;A$(A);X(A):G0T028 

5 

350 PRINT'TODE IS NOW ";A$(A):X( 

A):INPUT"ENTER NEW CODE"; X(A) : PR 

INT"Y0UR LINE NOW READS "A$(A);X 

(A):PRINT"D0 YOU WISH TO CHANGE 

MORE Y/N"" 

350 A$=INKEY$:IFA$-""THEN 360 

370 IFA$-"Y" THEN270 

380 IFA$="N"THENRETURN 

390 GOTO360 

400 "PRINT OUT CODES 

410 CLS:PRINTTAB(9);"PRINTING FI 

LE":PRINT#-2.CHR$(27);CHR$(53);C. 

HR$(1) 

420 FORC-1TO20:PRINT#-2.C:TAB(3) 

;A$(C):TAB(20);X(C): NEXT: RETURN 

430 "FILE SAVE 

435 CLS:PRINTTAB(11);"FILE SAVE" 

440 INPUT"ENTER YOUR FILES NAME" 

:F$:IFLEN(F$)>8 THEN PR1NT"Y0UR 

FILENAME IS TOO BIG, IT CAN ONLY 

CONTAIN UP TO 8 LETTERS" : GOTO 4 
40 
450 INPUT"D0 YOU WANT A (B)INARY 

OR (T)EXT FILE":B$ 
460 IFB$-"B" THEN490 
470 1FB$-"T" THEN 500 
480 GOTO450 

490 SAVEMF$+". BIN". 41582. 41601. & 
HB4F4: RETURN 

500 0PEN"0" .#1 . F$+" . DAT" : F0RC-1T 
O20:WRITE#1.A$(C).X(C):NEXTC:CLO 
SEV/l : RETURN 
510 END 

520 REM LOAD DATA 
525 CLS:PRINTTAB(11);"FILE LOAD" 
530 INPUT"FILENAME";F$:IF LEN(F$ 
)>8 THEN PRINT"TO0 BIG! ONLY 8 C 
HARACTERS OR LESS ALLOWED! " :GOT0 
530 

540 INPUT"(B)INARY OR (T)EXT";T$ 
550 IFT$-"B"THEN580 
560 IFT$-"T" THEN 590 
570 GOTO 540 

580 L0ADMF$+". BIN": RETURN 
590 OPEN" I".#1.F$+". DAT" 
600 FORC-1TO20 
610 INPUT#1,A$(C).X(C) 
620 NEXT:CL0SE#1:RETURN 
630 REM PUT DATA IN KEYBOARD MAT 
RIX 

640 CLS:PRINT"LOADING NEW DATA": 
FORC-1TO20:POKE41581+C.X(C):PRIN 
T" - " ; : : NEXTC : PRINT"DONE ! ! ! " : FORT 
T=1TO200:NEXTTT: RETURN 
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OUR LATEST 30 ISSUES 



ISSUE #59, MAY 1987 

GENEOLOGY 
HOME PUNT SELECT 
CHECK WRITER 
HEURESCUE 
KABOOM 
NEWPONG 
CROQUET 
FUNCTION KEYS 
ZOOM 
ELECTRONICS 2 

ISSUE #60, JUNE 1987 

JOB COSTING 

LABELS 

CATCH A CAKE 

COCO MATCH 

ROBOTS 

STREET RACERS 

BOWLING3 

ELECTRONICS 3 

GRAFIX 

KRON 

ISSUE #61, JULY 1987 

EZOROER 

SUBMISSION WRITER 
KEYS ADVENTURE 
WALLPAPER 
CHOPPER COMMAND 
UNDERSTANDING OPPS. 
BITCODE 
ELECTRONICS 4 
KINGPEDE 
RAIDER 

ISSUE #62, AUG.1987 

PENSION MANAGEMENT 

HERBS 

CATALOGER UTILITY 

RAIDERS 

ALPHABETIZING 

UFO 

ELECTRONICS 5 

RAMBO ADVENTURE 

BLOCKS 

CAVE 

ISSUE #63, SEP. 1987 
GENEOLOGST HELPER 
SMART COPY 
MAINTENANCE 
COC03- 00002 HELP 
DIRECTORY PICTURE 
SUBSTANTIAL ATTACK 
SAVE THE WAIDEN 
CAVIATOR 
ELECTRONICS 6 
MONKEY SHINE 



ISSUE #64, OCT. 1987 
GARDEN PLANTS 
FORT KNOX 
ELECTRON FORMULAS 
SNAKE IN THE GRASS 
CYCLE JUMP 
GEOMETRY 
WIZARD 
GAME OF LIFE 
ELECTRONICS 7 
FLIGHT SIMULATOR 

ISSUE #65, NOV. 1987 

TAXMAN 

DAISY DOT 

CHILD STONE ADVENT. 

SIREGGBERT 

CROWN QUEST 

GYMKHANA 

COCO 3 DRAWER 

FOOTBALL 

ELECTRONICS 8 

CHOP 

ISSUE #66, DEC. 1987 

ONE ROOM AOVENTURE 
0S9 TUTORIAL 
RIVER CAPTAIN 
SOUNDS 
BETTING POOL 
ADVANCE 
MATH TABLES 
ELECTRONICS 9 
LOWER TO UPPER 
NOIDS 

ISSUE #67, JAN. 1988 

MEDIA MASTER 
SAVE THE EARTH 
WEIGHTS S MEASURES 
LOW RES GRAPHICS 
COAST TO COAST 
BACCARAT 
BATTLESHIP 
ELECTRONICS 10 
TAPE CONVENIENCE 
DUEL 

ISSUE #68, FEB. 1988 

COINFILE 
WORD COUNTER 
SQUIRREL ADVENTURE 
AREA CODES 
DRAW POKER 
TURTLE RACES 
ELECTRONICS 11 
MULTI-SCREEN 
CANON PRINT 
COCO TENNIS 



ISSUE #69, MAR. 1988 
POLICE CADET 
STAMP COLLECTION 
BARRACKS ADVENTURE 
CITY/TIME 
HI-L06RAPS 
OLYMPICS 
HI-RES CHESS 
ELECTRONICS 12 
DOUBLE EDITOR 
DOUBLE BREAKOUT 

ISSUE #70, APR. 1988 

BLOTTO DICE 
SUPER COMM 
GENESIS ADVENTURE 
PLANETS 
PHKAVAR 
SIGN LANGUAGE 
ARX SHOOTOUT 
ELECTRONICS 13 
MAGIC KEY 
SNAP PRINT 

ISSUE #71, MAY 1988 

SUPER LOTTO 
RODOL ADVENTURE 
MAZE 
YAHTZEE3 
PHASER 
SHAPES/PLATES 
STAR WARS 
ELECTRONICS 14 
PRINTER CONTROL 
MAZE 2 

ISSUE #72, JUNE 1988 

MARKET WATCHER 

3 STOOGES 

HOSTAGE ADVENTURE 

PROGRAM TRIO 

GLADIATOR 

U.S. & CANADA QUIZ 

JEOPARDY 

ELECTRONICS 15 

COCO 3 PRINT 

CTTY 

ISSUE #73. JULY 1988 

FOREIGN OBJECTS 
CHESS FUNDAMENTALS 
WATERFOWL QUIZ 
WHAMMY3 

ADVENTURE TUTORIAL 
CIRCLES 
EDUCATION TRIO 
WRITE-UP EDITOR 
PICTURE PACKER 
AIR ATTACK 



EACH ISSUE CONTAINS 10 PROGRAMS 

READY TO LOAD. AVAILABLE ON TAPE OR DISK. 

SEE JULY '89 RAINBOW FOR EARLIER ISSUES. 




MasterCard 



SUPER SAVINGS 

SINGLE ISSUE S 8.00 

2-5 ISSUES S 6.00 EA 

6-10 ISSUES S 5.00 EA 

11 OR MORE ISSUES S 4.50 EA 

ALL88ISSUES $235.00 



ISSUE #74, AUG. 1988 

VIDEO CAT 3 
1 EYE WILLIE 
JAVA 

GAME TRIO 
CRIONAUT WARRIOR 
ENVELOPE PRINT 
RAM DRIVE 3 
MODE 2 

XMODEM TRANSFER 
CAVE II 

ISSUE #75, SEPT. 1988 

DRACULA ADVENTURE 
HELP TRIO PROGRAM 
SHOWDOWN DICE 
TARZAR 1 ADVENTURE 
ARAKNON 

CASH FLOW REPORTING 
GRAPHICS LETTER 
GRAPHIC EDITOR 
ADDRESS BOOK 
SQUARES 

ISSUE #76, OCT. 1988 

SUPERBUTZ3 
CHAMBERS 
TRIO RACE 
EARTH TROOPER 
STARGATE 

BOWLING SECRETARY 
DISK TUTORIAL 
JOYSTICK KEYBOARD 
KEYBOAR0< JOYSTICK 

EKIWgfl 

ISSUE #77, NOV. 1988 
POLICE CADET #2 
STARSHIP SHOWDOWN 
MUSIC COMPOSER 
COUPONS/REBATES 
PROGRAM LIBRARY 
BOYSCOUTSEMAPHOR 
HOUSEHOLD CHORES 
MAXOMAR ADVENTURE 
CHUCK LUCK3 

ISSUE #78, DEC. 1988 

POUCE CADET »3 
TANK TURRET 
WAR OF THE WORLDS 
SPINSTER CAFE 
COCO-SIZE 
SIGN MAKER 
LEGAL DEDUCTIONS 
BOOK KEEPING 
CAR LEASE 3 

ttwr;»imiHfliinriH 



ISSUE #79, JAN. 1989 
POUCE CADET #4 
DRAW POKER 3 
TILER TEX 
BATTLE 

INSIDE THE COCO 
COCO BULLETIN BOARD 
HOT DIRECTORY 
VCR TUTORIAL 
PRINTER CONTROL 

ISSUE #80, FEB. 1989 

SCRABBLE 
SPELLING CHECKER 
SANDSTONE AOVNT. 
THE FAMILY FEUD 
HARNESS3 HANDICAP 
MINIGOLF3 
ULTIMATERM3 
NETWORKING TUTORIAL 
A-MAZING PUCE 
liWHiiWI 

ISSUE #81, MAR. 1989 

MONSTERS 

SUPER CONCENTRATION 

TEN PROGRAMS COC03 

FINANCE 

SNOWBALL FIGHT 

RULER 

POP-UP WINDOWS 

TARZAR2- CASTLE 

SUPER USTER 

wasm 

ISSUE #82, APRIL 19B9 

DUNGEON MAZE 
DISK TRANSFER 
MAIL MERGE 
SUPER SPREADSHEET 
BUSTER 
TILER TWO 
DREAM TUNNEL 
DISK UTILITY 3 
EDUCATION TRIO 
mii'MiiffiJH 

ISSUE #83, MAY 1989 
T4D FIRST 80 
MODEM BATTLESHIP 
CHURCH MANAGER 
SUPER FILE SORT 
BASEBALL STATS 
TARZAR PT. 3 
INVOICE 
CARD SQUEEZE 
SWORDPUY1+2 



'TOM MIX PROGRAMS 



ISSUE #84, JUNE 1969 

CROSSWORD PUZZLES 
MOUNT DEATH 
TERRON 

DISK/TAPE TRANSFER 
PAPERWORKS 
SUPER DATABASE 
CONNECTS 
BUSINESS MODEL 
MASS FORMAT 

taamm 

ISSUE #85, JULY 1989 

5PUYERP0KER 
RESUME WRITER 
CRAZY CHEMIST 
JOURNEY UP 
SUBMAINIA 
WORKBENCH 
VACATION PUNNER 
DISK EDITOR II 
NIGHT OF THE NINJA 

iiTOfflmffla 

ISSUES 86, AUG. 1939 
TIME TRAP 
PHONE ACCOUNTANT 
ON TARGET 
NAME THAT TUNE 3 
USER DEFENCE 
CHECKBOOK BAUNCER 3 
KROACH ADVENTURE 
SUPER BAR GRAPH 
EASY LETTER 

BiiMiraaauM 

ISSUE#87, SEPT. 1989 

PURCHASE ORDER 

INVENTORY INVOICE 

AMERICAN TRIVIA 

KROACH 2 ADVENTURE 

TETRA 

SOLO POKER 

GAUXYQ3 

IBM PICTURE VIEWER 

RGB PATCH 

awji'ieii 

ISSUE #88, OCT. 1989 

SALES PROSPECTING 

VIRUS 3 

WILL MAKER 

JOURNAL-GENERAL LEDGER 

POUCE CADET #5 

RED DOG 

MAD UBS 

MACINTOSH PICTURE SAVER 

FROG 

aasmiMiiHmiiMH:! 



MAIL TO: 



T&D SUBSCRIPTION SOFTWARE 

2490 MILES STANDISH DR. 
HOLLAND, Ml. 49424 

(616) 399-9648 






RAINBOW 

CERTIFICATION 
SEAL 



PURCHASE 20 OR MORE ISSUES 

AND RECEIVE A FREE 

6 MONTH SUBSCRIPTION 



% 



70 



.00 



COCO I, II, AND III 
All Programs Include Documentation. 
We Send 1st Class - No Charge! 
For Information on Subscription Prices, 
Turn to Pages 57 S 75 



PLEASE CIRCLE 

TAPE 

OR 

DISK 



17 25 33 41 

18 26 34 42 
1! 27 35 43 

20 28 3! U 



19 57 E5 73 SI 

50 58 66 74 12 

51 59 67 75 33 

52 60 68 76 Si 



21 29 

22 30 

23 » 

24 32 



37 45 53 61 69 77 85 

38 <6 54 62 70 78 86 

39 »7 55 63 71 79 87 

40 48 56 64 72 80 88 



Name 



Address. 
City — 



State. 



Zip. 



Card #- 



Total $ 



Novices 
Niche 



)) 



THE RAINBOW is a leaching environment and we realize that the 
majority of our readers will always be beginners. In our continuing effort 
to always keep the new user in mind, and in addition to the many beginner 
feature articles and programs published in every issue, "Novices Niche" 
contains shorter BASIC program listings that entertain as well as help the 
new user gain expertise in all aspects of the Color Computer: graphics, 
music, games, utilities, education, programming, etc. 




Education 



'* 



What Day? 

by Rebecca Kastack 



16K 
ECB 



Monday's child is fair of face. 
Tuesday's child is full of grace. 
Wednesday's child is full of woe. 
Thursday's child has far to go, 
Friday's child is loving and giving, 
Saturday's child has to work for its living. 
But the child that is born on the Sabbath day 
Is fair and wise and good and gay, 

Most of us know what day of the week we were born on. But if 
you had to say what day of the week your friend's birthday or 
wedding day was on, would you know? Probably not. So what do 
you do? Ask CoCo! 

Just run What Day? and provide CoCo with the month and year 
in question. (To indicate the month, press any key until the desired 
month is highlighted, then press ENTER.) CoCo instantly produces 
a calendar for that time, showing the correct weekdays. 

By trial and error WluiiDay can also be used to find the year in 
which a speci fie date, month and day of the week would occur. The 
program allows for leap years and special turn-of-the-century leap 
years. It is accurate to 1770, when the Gregorian calendar (the 
current system) was adopted in most countries except for Russia 
anil parts of Asia. WluiiDay is also accurate for any year in the 
fu I ure. 

The listing: WHATDAY 

" COPYRIGHT 1989 FALSOFT.INC 

1 DIM ND(12).I$(12).M$(12).M(12) 
,DY$(7),P0(31) 

O • ■> II M HUM II Nil If H •• tin mii ii ii ii it m nil linn 

3 "' WHAT DAY ? 

4 '" BY REBECCA KASTACK 

5 

6 YE=1986:M0=12:DT=3:DY=4 



7 GOTO 9 

8 RESTORE 

9 CLS:PRINT@11."WHAT DAY ?": PRIN 
T@40,STRING$(16,34) 

10 DATA 31, January, JANUARY, 128, 2 
8, february, FEBRUARY, 192, 31, march 
.MARCH, 256. 30, apn'l .APRIL. 320. 31 
.may. MAY. 140, 30, June, JUNE, 204. 31 
.July. JULY, 268, 31, august. AUGUST. 
332, 30. September, SEPTEMBER. 150, 3 
1. October, OCTOBER, 214 

11 DATA 30, november, NOVEMBER, 278 
, 31, december. DECEMBER, 342 

12 FOR A-l TO 12:READ ND(A).I$(A 
).M$(A),M(A):PRINT@M(A),M$(A);:N 
EXTA:M=1:A=12 

13 IF MXA THEN PRINT@M(M) , 1$ (M) 
;:PRINT@M(A).M$(A); 

14 A=M 
I$=INKEY$:IF 1$="" THEN 15 
IFASC(I$)-13 THEN 19 
M=M+1:IFM>12 THEN M=l 
GOTO 13 

PRINT@384,"YEAR": : INPUTY: IFYE 
THEN C=Y:D=YE ELSE C=YE:D=Y 
IFC/4OINT(C/4)THENC=C+l:G0T0 



15 
16 
17 
18 
19 
>Y 
20 
20 
21 
21 
EN 
22 



IFD/4OINT(D/4)THEND-D-l:G0T0 
ELSE 00-((D-C)/4+l):IFYE>Y TH 
C=Y:D=YE ELSE C=YE:D=Y 
IFC/100OINT(C/100) THEN C=C+ 
1:G0T0 22 ELSE IFOD THEN25 

23 FOR A=C TO D STEP 100: 1 FA/400 
OINTCA/400) THENOO=00-1 

24 NEXTA 

25 IFY/4-INKY/4) THEN KK=29 ELS 
E 28 

26 IFY/100-INT(Y/100) THEN IFY/4 
00<>INT(Y/400) THEN28 
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27 G0T029 

28 KK=28 

29 IFYE>Y THEN35 

30 'FUTURE 

31 00=00+(Y-YE)*365+28 

32 FOR Z=M TO 12 : IFZ=2 THEN 00=0 
O-KK ELSE 00=00-ND(Z) 

33 NEXTZ:00-00+l:00-00-INT(00/7) 
*7:YD=DY+00:IFYD>7THENYD=YD-7 

34 GOTO 41 

35 'PAST 

36 00=00+(YE-Y+l)*365-28 

37 XX-M-1:IF XX<1 THEN 40 

38 FOR Z-l TO XX:IFZ=2 THENOO=00 



-KK ELSEOO=00-ND(Z) 

39 NEXTZ 

40 00-00-1:00-00-INT(00/7)*7:YD- 
DY-OO: IFYD<1THENYD=7+YD 

41 IFM<>2 THEN KK=ND(M) V 

42 CLS:B=(32-LEN(M$(M))-5)/2:PRI 
NT@32+B,M$(M);Y:PRINT@98."SUN MO 
N TUE WED THU FRI SAT" ; : L=128 : U- 
(YD-1)*4+1:F0RA-1 TO KK:PRINT@L+ 
U . A ; : U=U+4 : I FU>25THENU=1 : L-L+32 

43 NEXTA 

44 PRINT@448, "PRESS ENTER TO TRY 
ANOTHER >"; : INPUT Y$:RUN 



Utility 



Disk Copy Utility 

by William F. Medlock 




Everyone likes a program that takes minutes to enter and is 
useful. This one is both short and useful. It copies every file from 
one disk to another, one file at a time — unlike BACKUP, which 
copies the whole disk, trash and all. It reads the directory and 
executes COPY commands just as you do. 

One of the best uses for the program is the elimination of file 
fragmentation. File fragmentation happens when disk files are 
broken up and spread all over the disk. You can tell this is 
happening when the drive heads move back and forth excessively 
while reading or writing files. It usually happens on a disk with a 
variety of files that are constantly being saved and killed. 

PC owners have eliminated file fragmentation by copying 
everything to a fresh disk using a wildcard copy. A wildcard copy 
is a command syntax that tells the computer to copy every file in 
one directory to another directory or another disk. To do the same 
thing on a CoCo has, until now, been laborious. Every file had to 
be copied one at a time, which meant typing every filename twice. 
Now you can throw out the trash, just like the big guys. It can be 
done on any model CoCo with two disk drives. 

Using Copy is simple; I recommend using it after a hard Reset. 
Either turn the computer off and on again, or type in POKE113.0. 
Then push the Reset button at the right rear of the computer. Next 
load the program, put the source disk in Drive (land the destination 
disk in Drive 1, turn on verification if wanted, and run it. 

The program loads each disk seclorof the directory one at a time 
and extracts the filenames contained in those sectors. It inserts a 
period to separate the filename from the extension, then uses the 
filename with the COPY command. The program does not overwrite 
existing files on the destination disk. 

The listing: COPY 

' COPYRIGHT 1989 FALSOFT.INC 

10 CLEAR 500 

20 ' 

30 'FUNCTION RETURNS ELEMENT OF 



ARRAY 

40 DEFFNA(X)=INT(2*((^/8)-INT(X/ 

8))) 

50 ' 

60 'FUNCTION RETURNS POSITION IN 

ARRAY 
70 DEFFNB(X)=128*((X/4)-INT(X/4) 
)+l 
80 ' 

90 'TRUE IF X DIVISIBLE BY 8 
100 DEFFNC(X)=(X/8-INT(X/8)=0) 
110 ' ' 

120 'FUNCTION RETURNS NUMBER OF 
SECTOR 

130 DEFFND(X)=INT(X/8)+3 
140 ' 

150 "PROGRAM BODY 
160 ENTRY = 
170 'LOAD DISK SECTOR INTO A$(0) 

AND A$(l) 
180 IF FNC(ENTRY) THEN DSKI$0.17 
,FND(ENTRY).A$(0),A$(1) 
190 'PULL FILE NAME OUT OF ARRAY 
200 NAME$=MID$(A$(FNA(ENTRY)).FN 
B(ENTRY).H) 

210 'SKIP IF ENTRY KILLED 
220 IF ASC(NAME$)=0 THEN ENTRY=E 
NTRY+1:G0T0 180 

230 'TERMINATE IF ENTRY UNUSED 
240 IF ASC(NAME$)=255 THEN END 
250 'FORMAT NAME 

260 NAME$=LEFT$(NAME$.8)+"."+RIG 
HT$(NAME$,3) 
270 'COPY FILE 

280 PRINT"C0PYING FILE ";NAME$ 
290 COPY NAME$+":0" TO NAME$+":1 

300 'INCREMENT AND LOOP 
310 ENTRY=ENTRY+1:G0T0 180 
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Box Menu 

by Bill Bernico 




This short subroutine spices up your menu screen and makes 
item selection less ordinary. 

Substitute your own menu choices for these, but use the same 
procedure for placing the box around the chosen selection. It's all 
done with PRINT@statements. Variables W, X. Y and I define the four 
areas where the character string is drawn to surround the menu 
choice. 

Instead of RUN at the end of a line as in lines 7 through 10, your 
program actually branches off to do the task described in that 
selection. Scroll the menu up by starting the print on the bottom 
line of the screen. As more choices appear, the previous choice 
scrolls up until all choices are in place, ready for you to select a 
number and branch off. 

The listing: BOXMENU 

' COPYRIGHT 1989 FALSOFT.INC 

1 'BOX MENU' (C) 1989 FROM 

BILL BERNICO SOFTWARE 

AN EXAMPLE OF HOW TO SPICE 

UP A MENU IN YOUR PROGRAMS 

2 T$=CHR$(142)+STRING$(15,140)+C 
HR$(141):B$=CHR$(139)+STRING$(15 
,131)+CHR$(135):R$=CHR$(133):L$= 
CHR$ ( 138 ):CLS:PRINT@494, "menu" :P 



RINT:G0SUB12:PRINTTAB(8)"1. ADD 
ITEMS" :G0SUB12:PRINTTAB(8)"2. DE 
LETE ITEMS":G0SUB12:PRINTTAB(8)" 
3. SAVE TO DISK":G0SUB12 
3 PRINTTAB(8)"4. LOAD FROM DISK" 
:G0SUB12:PRINTTAB(8)"5. QUIT PRO 
GRAM" :G0SUB12:PRINTTAB( 9) "SELECT 
(1-5)":G0SUB12 



A$=INKEY$:IF A3 
A=VAL(A$):0N A 



-""THEN4 

GOTO 7.8,9,10,1 



G0T04 

W=74:X=138:Y=106:Z=122:GOSUB14 
:G0SUB13:RUN 

8 W=138:X=202:Y=170:Z=186:GOSUB1 
4:G0SUB13:RUN 

9 W=202:X=266:Y=234:Z=250:GOSUB1 
4:G0SUB13:RUN 

10 W=266:X=330:Y=298:Z=314:GOSUB 
14:G0SUB13:RUN 

11 W=330:X=394:Y-362:Z=378:GOSUB 
14:G0SUB13:CLS:END 

12 FORX-1TO100 : NEXTX : EXEC43345 : P 
RINT@511 ,"": RETURN 

13 PLAY"O5T60B":FORX=1TO1500:NEX 
T:RETURN 

14 PRINT@W,T$;:PRINT@X,B$;:PRINT 
@Y,L$; :PRINT@Z,R$; : RETURN 



Moonscape 

by Jim Forster 




You have a view of the moon almost every night. Have you ever 
wanted to see the earth hanging in the sky instead? This program 
was written for the CoCo 3 with an RGB monitor. If you do not 
have an RGB monitor, some of the colors may be different. 

You just might see an eclipse because each view is different. So 
take the place of Neil Armstrong and voyage to the moon! 



FALSOFT.INC 
I FORSTER 



The listing: MOON 

' COPYRIGHT 1989 

5 'MOONSCAPE BY Jit 

10 ON BRK G0T0225 

15 POKE65497.0 

20 HSCREEN2:HCLS8 

25 FOR P-1TO10:READPP:PALETTEP,P 

P.-NEXTP 

30 DATA 3,15,17,8,63,32.56.0.50, 

31 

35 FORU=1TO200:D-RND(159)*2:F=RN 

D(95)*2:HSET(D.F,5):NEXTU 

40 D=RND(300)+10:F=RND(100)+10 



45 HC0L0R9.8:HCIRCLE 

NT(D.F).9,9 

50 HLINE(D-4,F+7)-(D 

:HLINE(D+4.F+7)-(D+5 

55 HC0L0R1.8 

60 HDRAW"BM0,165" 

65 FORT-1TO100 

70 D=RND(2) 

75 IF D-l THEN F$-"+ 

80 D$="M+"+STR$(RND( 

TR$(RND(8)) 

85 HDRAW D$ 

90 IFT>65THEN95ELSEN 

95 FOR E-76T0192:IFH 

<>8 THEN 105 ELSE NE 

100 NEXTT 

105 FORZ=0TO320:HPAI 

1:NEXTZ 

110 HC0L0R2,8:EX=RND 

RND(36)+30:HCIRCLE(E 

115 HDRAW"BM"+STR$(E 

R$(EY+19)+"R5H2R3HG2 

3F2R6FR2UR4E4D4R4F": 

+23), 3. 2 

120 HDRAW"BM"+STR$(E 



(D,F),9:HPAI 

-5,F+7),PSET 
,F+7),PSET 



"ELSE F$="-" 
8))+"."+F$+S 



EXTT 

POINT(320,E) 

XTE 

NT(Z.192),1, 

(235)+30:EY= 

X,EY),30 

X-22)+","+ST 

D2R4UR3UR4FR 

HPAINT(EX.EY 

X)+","+STR$( 
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New Tides! The Best in Color Computer Software* 



HAl \ 








Radio Shack has a library of programs for 
entertainment, education and productivity 



Ac Radio Shack, we're dedicated 
to making sure that you never run 
out of ways to use and enjoy your 
Color Computer. We've got a ter- 
rific line of software of all types. 

Let your Color Computer open 
the door to a world of fun. Choose 
from a dazzling selection of popular 
and challenging games, including 
popular Nintendo™ titles. 

One of the most valuable poten- 
tials of your Color Computer is in 
providing your children a head 
start in their education. We've got 



learning programs for children of 
all ages that will provide hours of 
productive fun! With this selec- 
tion, you'll find programs that help 
develop hundreds of useful skills. 

No matter what your personal 
needs, we've got programs that'll 
put your Color Computer to work 
where you need it most — like per- 
sonal filing, word processing, 
spreadsheets and communications. 

Send in the coupon for a free 
copy of our 1990 Software Buyer's 
Guide. Or pick one up at any 



Radio Shack — your one-stop 
neighborhood software center. 



Send me a new 1990 software guide. 

fMail to: Radio Shack, Oepl. 90-A-115-07 
300 One Tandy Center, Fort Worth, TX 76102 



Name, 



Address . 

I City _ 
Stale 

Z,P_ 
Phone 



Radio /hack 



Nintendo /TM Nintendo of America, Inc. 



The Technology Store 

A DIVISION OF TANDY CORPORATION 



EY-17)+"S3R4DR4E2R5FD3R3U2ER4F6G 

8F3L2H3UL4G3L2GR3E3D2G3R3D4F2R3E 

2RF3DF3DG3DG3DG3D2F2GL3U3L2U8H3L 

H3U2H3L3H4U3H2LU3HU3L4G2LDH3L2U3 

E3R2F2DR3F2R2":HPAINT(EX,EY-15), 

3.2 

125 HDRAW"BM"+STR$(EX-14)+"."+ST 

R$(EY-17)+"S3H2UL3HUL4U2LG2L3" 

130 HDRAW M BM"+STR$(EX-14)+","+ST 

R$(EY-17)+"S3G2DG2L3DG2D3R2D2G2L 

2G2LD3G2L3G2L5":HPAINT(EX-17,EY- 

16), 3,2 

135 HDRAW"BM ,, +STR$(EX-17)+","+ST 

R$(EY+1)+"D2L2H2L3U2G2D2LG2D4R2E 

2R4F3RE2U2EUH2U3":HPAINT(EX-19,E 

Y+4),3,2 

140 HPAINT(EX.EY).4,2 

145 FORZZ=1TO130 

150 HH=RND(52)+2:VV=RND(50)+5:IF 

((HH<20 AND VV>15 AND VV<45) OR 

(HH>38 AND VV>15 AND VV<45) OR ( 

VV<20 AND HH>15 AND HH<45) OR (V 

V>38 AND HH>15 AND HH<45)) THEN 

160 

155 IF((HH<20 AND VV<20) OR (HH< 

20AND VV>38) OR (HH>38 AND VV<17 

) OR (HH>38 AND VV>38) )THEN150 

160 HSET((EX-30)+HH,(EY-30)+VV.l 



0):HSET((EX-30)+HH+2,(EY-30)+VV- 

1,10) 

165 NEXTZZ 

170 HC0L0R7.8 

175 J=158:K=97 

180 FORW-1TO100:K-K+1:J-158:FORO 

=1T05 

185 IF HPOINT(J,K)=1THEN190ELSEJ 

=J+l:NEXTO:NEXTW 

190 HLINE(J,K)-(J,K-8),PSET 

195 HLINE-(J+7.K-12).PSET.B 

200 HC0L0R4.8 

205 HSET(J+1.K-11):HSET(J+2.K-11 

):HSET(J+3,K-11):HC0L0R6,8:HLINE 

( J+4 , K- 1 1 ) - ( J+7 . K - 1 1 ) , PS ET : HCO LO 

R7,8:HLINE(J+1.K-10)-(J+7.K-10), 

PSET:HC0L0R6,8:HLINE(J+l,K-9)-(J 

+7.K-9).PSET 

210 X$=INKEY$: I FX $=""THEN21 5 ELSE 

RUN 

215 IF RND(125)-1 THEN PALETTE5. 

55:GOSUB220:PALETTE5,63:GOSUB220 

:PALETTE5,55:GOSUB220:PALETTE5,6 

3:GOTO210ELSE210 

220 FORT=1TO50:NEXTT:RETURN 

225 POKE65496,0:HSCREEN0:WIDTH32 

:END 




The Base Converter 

by James Stakelin 



Have you ever had the task of converting $F1 in Base l6toBase 
2? Or have you wondered just what a hexadecimal number should 
mean to you? Well, worry no more. Here is The Base Convener. 
the program that takes the job off your hands. 

To put it simply. The Base Convener translates 6r converts any 
number in any number base to any other base. If you have ever tried 
to do this, you know how much time a large number can consume, 
especially when a base higher than 10 is used. Finally you can do 
it electronically with your Color Computer. 

To use the program, simply follow the three input prompts. 
Enter the number and its base, then enter the base to which you 
want it converted. 



The listing: CONVERT 

* COPYRIGHT 1989 FALSOFT.INC 

1 CLS:PRINT"THE BASE CONVERTER" 

2 PRINT: INPUT'WHAT IS THE NUMBER 
YOU NEED CONVERTED" ;I$:IFI$ 

=""THEN2 

3 INPUT"WHAT BASE IS THIS NUMBER 

IN";B:F0RX=1T0LEN(I$):IF 
B=<10ANDVAL(MID$(I$.X.1))=>B THE 
NPRINT"IMPOSSIBLE IN GIVEN BASE. 
":G0T03ELSENEXT 

4 FORX=1TOLEN(I$):FORY=65TO90:IF 



ASC(MID$(I$,X,1))=Y ANDB<=10THEN 
PRINT-IMPOSSIBLE IN GIVEN BASE." 
:G0T01ELSENEXT 

5 INPUT"T0 WHAT BASE DO YOU WANT 
THIS C0NVERTED";B1:IFB1=B THE 
NPRINT"Y0UR TWO BASES ARE THE SA 
ME.":G0T05ELSEIFBK2THENPRINT"TH 
E BASE IS TOO L0W.":G0T05 

7 CLS:PRINT"NUMBER:";I$:PRINT"BA 
SE";B:PRINT"C0NVERT TO BASE";B1: 

PRI NT"*********** ***** 

******THE ANSWER IS:"; 

8 IFB>10ORB1>10THEN1000ELSEIFB<1 
0THEN100 

10 REM *** CONVERT TO Bl *** 

11 FORX=1TOLEN(I$):N(X)=0:NEXT:G 
=0 : A=0 : X=0 

12 A=VAL(I$):IFA<B1 THENX-X+1:N( 
X)=A:G0T014 

13 C=INT(A/B1):X=X+1:N(X)=A-(C*B 
1):I$=STR$(C):G0T012 

14 F0RY=X T01STEP-1:A$-A$+STR$(N 
(Y)):NEXTY 

15 F0RY=1T0LEN(A$):IFMID$(A$,Y.1 
)=" "THENNEXTELSEPRINTMID$(A$,Y, 
1); :NEXT 

16 END 

100 REM *** CONVERT TO 10 *** 

101 F0RX=1T0LEN(I$):N(X)=VAL(MID 
$(I$,X,1)):NEXT 

102 G=LEN(I$):F0RX=1T0 LEN(I$):G 
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COCO 3'S MISSING LINK : 

BIG BASIC 

BASIC USERS GET FULL POWER OF MEMORY MANAGEMENT IN WINDOWS! 

"Danosoft has a winner in Big Basic, and I would recommend it to anyone 
wanting to get the most out of a Color Computer 3." - Rainbow, Oct./89. 

Now you can access up to 472K of memory in a 512K CoCo or up to 92K in a 128K machine with 
any mix of programs and/or data . At last, you can do sizable basic programming with a CoCo 3. 
(Also offers simplified memory management for M.L. programmers.) 

Magically fast, executes one big program or database in basic; or up to 58 separate basic programs 
running at once from computer memory in up to 58 separate windows! Saves programs or variables 
with their currently running parameters and loads back that way as if you never left the program. 

Chain in unlimited sized programs or data from disk(s) without erasing existing programming or 
variables. Also works with the RGB-DOS Hard Disk system. 



3 new simple basic words create the power. 

Provides for variable exchange between 

windows. 

Programs can be saved over multiple disks or 

use our BIG DISK Utility. (See below) 



Modifies your basic operating system in some 70 

locations but does not occupy user memory. 

Includes 7 Demo Programs and Manual. 

Disk use only; any version RS-DOS. 

ONLY $39.95 U.S. or $46.35 CDN. + $2.50 S & H 

Ontario residentsadd 8% PST. 



"BIG RAMDISK" (512kCoCo3 V.2.0or V.2.1) 

• Copy or backup your programs or data to "BIG RAMDISK 
and get the speed of program/data saving or loading to an "in 
memory" device. ("COPYDISK" Utility included.) 

• Great for use with all other programs on this page and 
most commercial software. 

• You can install, re-install, format and reformat from direct 
mode or from a program without erasing programming or 
variables. It's in machine language, does not occupy user 
memory, but can be user located elsewhere if needed. 



Your choice of one big 158 granule ramdisk (80 lracks-360k) 
or two 68 or 78 granule ramdisks (35-40 tracks to 360k total), 
depending on your DOS. (i.e. RS-DOS, "BIG DISK", 
"DOUBLE40", etc.) 

Ramdisk files and directory do not erase with a reset coldstan 
(ALT/CTRL), and are preserved if a program crashes. This 
lets you use some programs that need a Coldstart to exit. 

■ "BIG RAMDISK" with "BIG DISK" or "DOUBLE40" (see 
below) & two double-sided drives => 1 MEG. on line. 
ONLY S12.95 US or S14.95 CDN + S2.50 S & H. 

OnL Residents add 89b PST 



For any CoCo (at least 64K) with 1.1 or 2.1 Disk Extended Basic: 
"UTILITIES PACKAGE" "MEMORY MASTER" 



6 HANDY M.L. RESIDENT UTILITIES FOR BASIC 

"Must - have software for the disk user" 

- Rainbow, Nov../89. 



"BIG DISK" 

"DOUBLE40" 
"CONVERT/DISK" 



■ Makes computer sec double-sided drives 
as one 360K (80tk) drive; 158 granules. 

■ Sets drives for 40 tracks each side. 

• Formats 40 tracks on each side of a 
disk without disturbing the first 35. 
Doubles all your present storage. 



"QUIKDRIV/6MS" 
"QUIKDRIV/30M 
"SET FEED" 



Sets fast drive stepping rate. 
Fast drive shut off. 
Sets line spacing for printouts. 
Only S 17.95 U.S. or $20.80 CDN. + $2.50 S & H. 

OnL Residents add &% PST. 



OUR FAVORITE PROGRAMMING TOOL 

"Memory Master is a unique hacker's program 

offering about all you could ask for in a disk and 

memory utility." - Rainbow, Sept./89. 

Scan, Edit, Copy, Printout any memory in your 
computer or on disk. Fix disks. 

Fast entry of M.L. Listings. 

Dual Windows! Runs 2 Basic Programs at once! 



RAINBOW 



Disk chains unlimited amounts of program 
sections or data. 

Includes Demo Program and Manual. 
$24.95 U.S. or $28.95 CDN. + $2.50 S & H. 

Om. Residents add 8% PST 



DANOSOFT 

Box 124, Station "A" 
Mississauga, Ontario L5A 2Z7 



10% Discount 

on purchase of 
3 or more items 
at the same lime. 



Order by Phone or Mail f visa 
(416) 897-0121 
Shipped Airmail Same Day 



=G-1:A=A+N(X)*(B A G):NEXT 

103 IFB1-10 THENPRINTA:END 

104 I$=STR$(A):GOTO10 

1000 REM *** OVER 10 CONVERT *** 

1001 FORX=lTOLEN(I$):N$(X)=MID$( 
I $ . X . 1 ) : NEXT : FORX=1TO LEN ( I $ ) : FOR 
Y=65TO90:IFN$(X)=CHR$(Y) THENN$( 
X)=STR$(Y-55):NEXTY.X 

1002 NEXTY.X:M=LEN(I$):FORX=lTOL 
EN(I$):M=M-1:S=VAL(N$(X))*(B A M): 
N$(X)=STR$(S):S=0:NEXT 

1003 FORX=lTOLEN(I$):A=A+VAL(N$( 
X)):NEXT 

1005 IFB1=10THEN103 

1006 IFBK10THENI$-STR$(A):GOTO1 



1010 REM *** CONVERT TO Bl *** 

1011 FORX=1TOLEN(V$):N(X)=0:N$(X 
)="":NEXT:V$=STR$(A) : I$=V$ 

1012 P=VAL(I$):IFP<B1 THENJ-J+1: 
N(J)=P:GOTO1014 

1013 C-INT(P/B1):J-J+1:N(J)-P-(C 
*B1):I$=STR$(C):GOTO1012 

1014 FORY=J T01STEP-1:IFN(Y)>9TH 
ENG$=G$+CHR$(N(Y)+55):NEXTELSEG$ 
=G$+STR$(N(Y)):NEXT 

1015 FORX=lTOLEN(G$):IFMID$(G$.X 
.1)=" "THENNEXTELSEPRINTMID$(G$. 
X.1);:NEXT 

1016 END 



Searching 
for a Rainbow 

by Carlos A. Garcia 




Here is a simple graphics program dial animates a rainbow and 
a waterfall. Just type in the listing and run. 

The listing: RAINBOW 

' COPYRIGHT 1989 FALSOFT.INC 
^ ************************ 

2 '* RIVER OF RAINBOW * 

3 '* BY * 

4 '* CARLOS A. GARCIA * 

5 '* ADJUNTAS ,P.R * 
5 • *********************** 

10 ON BRK GOTO 620 

20 POKE 65497.1 

30 CMP 

40 HSCREEN 2 

50 HCLS 8 

60 HCOLOR 4 

70 PALETTE 15 ,28: PLAY"L20 ; 03" 

80 PALETTE 14,15 : PALETTE 13,3 

90 PALETTE 2.29 

100 FOR T-l TO 8 

110 READ A.B.C.D 

120 HLINE(A,B)-(C,D).PSET 

130 NEXT T 

140 HPAINT(4.100),15,4 

150 HLINE(0,90)-(320.90) ,PSET 

160 HPAINT(0,0),2.4 

170 HPAINT(2.125).14,4:HPAINT(32 

0.95).14,4:HPAINT(0,191),13.4:HP 

AINT(320.191).13.4 

180 PALETTE 4,0 

190 GOTO 220 

200 DATA 0,96.160,110.160.110.17 

0.191,170.191.130.191.130.191,12 

0.120.120.120.0.110 

210 DATA 0.110,0,130.0,130.120,1 

20.160,110,320,100 

220 PALETTE 12 ,64: PALETTE 11,64 



230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

.1 

510 

"Rai 

520 

530 

G 
540 
550 

G 
560 
570 
580 
:D=0 
590 
610 
620 



FOR T=130 TO 160 STEP 5 

1=1-1 

FOR G-118+I TO 191 STEP 6 

HSET(T,G.12) 

NEXT G.T 

1=0 

FOR T=130 TO 160 STEP 5 

1=1-1 

FOR G-121+I TO 191 STEP 6 

HSET(T.G.ll) 

NEXT G.T 

H=26 

FOR T=98 TO 107 STEP 3 

H=H-5:S=0 

FOR G=0 TO 130+H STEP 8 

S=S+.7 

HSET(G.T+S.ll) 

NEXT G.T 

H=26 

FOR T=98 TO 107 STEP 3 

H=H-5:S=0 

FOR G=4 TO 130+H STEP 8 

S=S+.7 

HSET(G.T+S,12) 

NEXT G.T:S=0:C=1 

FOR T=50 TO 70 

S-S+l : I F S=4 THEN S=1:C=C+1 

HCIRCLE(160.T).160.4+C. .3.. 5 

NEXT T:HC0L0R9:HPRINT(1,23), 

nbow" 

PALETTE 11,28:PALETTE 12.64 

FOR G-l TO 10:GOSUB 570:NEXT 

PALETTE 11,64:PALETTE 12,28 
FOR G-l TO 10:GOSUB 570:NEXT 

GOTO 520 

C=C+1 : IF C=>11 THEN C=5 

D=D+H:IF D=>64 THEN H=RND(6) 

PALETTE CD 

RETURN 

CLEAR:CMP:POKE 65496, 1:CLS 



36 



THE RAINBOW January 1990 





The Memo Maker 

by Darrin Seats 



This program lakes what is typed in and saves it to the disk. To 
load the screen back later, simply type LOADM"FILENAME",and the 
text pops up on the screen. Every computer owner has tidbits of 
information written on pieces of paper. Now all you have to do is 
load the program and run it. It will not erase a program already in 
memory. Instead of scraps of paper lying around. I now have a disk 
that holds all my miscellaneous notes. 



The listing: MEMQMAKE 

' COPYRIGHT 1989 

1 REM **"MEM0 MAKE 
DARRIN SEATS 

5 CLS:PRINTTAB(11) 
INT:PRINT"PRESS (/ 
TH MEMO":PRINT:PRI 

10 INPUT"MEMO NAME 

11 IF LEN(N$)>8THE 
20 A$=INKEY$:IFA$= 
25 IFA$=CHR$(47)TH 
$; :G0TO 20 

SAVEM N$. 1024,1 
PRINT: PRINT"T0 



FALSOFT.INC 
" CREATED BY 

"MEMO MAKE": PR 

) WHEN DONE WI 

NT 

:";N$:CLS 

N RUN 

""THEN20 

EN40ELSEPRINTA 



535,1024 
SEE MEMO TYPE: 
L0ADM"+CHR$(34)+N$+CHR$(34) 



40 
45 



Games 



Gopher Smash 

by Thomas Wong 




Have you ever tripped over a hole in your yard and discovered 
that gophers are inhabiting your property? If so, you probably 
won't be happy when the time comes to repair damages. While 
you're taking a break from your inevitable battle with the gophers, 
load Gopher Smash into your CoCo 3 and take out some of your 
frustrations. 

After the program has initialized, you see nine boxes, each with 
a letter defining it. When a gopher pops up, press the key corre- 
sponding with the box containing the gopher, for as many times as 
the gopher is visible. The higher the gopher is above the ground, 
the more points you receive. Watch out for the surprise bombs. The 
bombs are the same point value as the gophers except they 
subtract, rather than add. from your score. The main goal is to gain 




m 



LOOK NO FURTHER 
THE BEST VALUES ARE RIGHT HERE! 

THE SUPER DISK 

14 separate disk utilities on 1 disk and a 30 plus page manual! Learn the 
secrets of copy protection. Utilities to help you create your own unique 
protection schemes and examine other. Read & write entire tracks, including 
the unseen secret information between sectors. There's never been anything 
like it! SALE PRICED NOW AT JUST $39 

WARGAME DESIGNER II 

It's the conflict simulation crealion system that destroyed the competition 
"It's sure to become a standard..." JC, CO You get 4 ready to play scenarios. 
Easily create your own units, maps, complete scenarios. JUST $24 
Get the WGD II ICON DISK too with over 500 ready to use icons. ONLY $15 
WEEKLY WINNER 3 

Due to many changes in lottos, we had to update Weekly Winner. It now 
will allow you to play 3,4,5,6 and 7 digit lottos. It also is easier to edit your 
database and gives more into when you do a printout. We hit 4 out of 6 in 
the Ohio Super Lotto the first time we tried the new version! Don't play the 
Lotto without it! STILL ONLY $15 or upgrade for just $9. 

GRIDIRON STRATEGY 

This is PRIME football time. Get a friend over and enjoy some pig skin fun 
of your own. GS is still the best strategy football game for the COCO 3 and 
is SALE PRICED at JUST $18 

CC3 FLAGS 

The BEST "Risk" play alike available for the COCO 3. ONE SALE NOW 
for $18. 

AIR WARS PLUS 

Challenge a friend to a dog fight in mid air or in space with AIR 
WARS PLUS. 3 exciting, easy to play arcade style games for 2 
«w* players. A BARGAIN AT $15. 

ELD US 

'ffflf Explore the multi level world of ELDUS in this 100+ screen, all 
..TTi joystick graphical adventure. STEAL THIS GAME FOR ONLY $1 6. 

RORKES DRIFT 

._. A FAST action simulation of one of Britain's most famous battles. 
!wJ No need for a game save feature, the ZULUs come at you from all 
£■»■>' sides. Can you survive until reinforcements arrive? ONLY $15 

2 FOR 1 SALE 

Historic buffs will appreciate this one. Buy PENINSULAR WAR and get THE 
RUSSIAN CAMPAIGN FREE! Both are stralegic level military campaigns 
of the Napoleonic era. One on the plains of Spain, one in the Russian steppes. 
You could lose playing but you can't lose buying! BOTH for ONLY $15. 

MORE 2 FOR 1 

Buy MASTER DIR, the fastest disk cataloging program around and get 
CC3CRAM, a picture compression utility, FREE. A $30 value for JUST $18. 

EVEN MORE 2 FOR 1 

Buy the ever popular COCO 3 WHEEL and get BUCK GRID FREE! WHEEL 
is the word game that could make you a fortune, recently updated too. BLACK 
GRID is a mind wrenching graphic puzzle guaranteed to have you pulling 
your hair out! Great multi player fun for the holidays! A $38 value for ONLY $19 

VOCAB 

SCRABBLE fans, get ready! This play alike is for 1 to 6 players and is great 
party fun. Beautifully executed by R. Cooper. You can even take on the 
computer opponent, Mr. Vocab! IT's NEW, IT's FUN, IT'S ON SALE FOR $19 

Our CATALOG ON DISK is still JUST $3. See before you buy. If you order 
from the CATALOG ON DISK, deduct $3 from your order & recover the cost! 

NOT TO WORRY! All orders are shipped within 24 hours of receipt by FIRST 
CLASS mail FREE anywhere on this planet! You'll have it in time for the 
holidays. But, don't delay. ORDER NOW! 

We accept mail S phone orders with payment by check, money order, VISA 
and MASTER CARD. COD's add $3. 



SPORTSware 

1251 South Reynolds Road, Suite 414, Toledo, Ohio 43615 

(419) 389-1515 
All SPORTSware products are available ONLY from SPORTSware 
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ihe highest possible score in 60 seconds. When your lime is up, you 
are asked if you want to try again or stop. 

The game can be modified in several ways. For those who want 
customized keyboard layout, change every third value of the data 
statement in Line I with the ASCII equivalent of the keys you want 
to use. Also, if the gophers pop up too fast, delete the high-speed 
poke in Line 1 . These are just a few examples of what you can do 
to change the program. Good luck smashing gophers! 

The listing: SMASH 

' COPYRIGHT 1989 FALSOFT.INC 

1 POKE65497,0:HSCREEN2:HCOLOR0,0 
: HC0L0R4 , : H=0 : K=l : F0RA=1T08 : HBU 
FFA.750:NEXTA: F0RB=1T09 : READC(B) 
. D ( B ) , E ( B ) : NEXTB : DATA32 , 40 . 81 , 12 
8.40.87,224,40,69.32,88,65,128.8 
8.83.224,88,68.32,136.90,128,136 
.88.224.136,67 

2 HCIRCLE(28,24),28,4, .3,.5,0:HC 
IRCLE(14.24).8.4:HCIRCLE(14.24). 
2.4:HCIRCLE(42.24),8,4:HCIRCLE(4 
2,24),2.4:HDRAW"BM28,24F8L16E8BD 
10R8D2G4L8H4U2R8D6":HPAINT(14.20 
),7,4:HPAINT(42,20).7.4:HLINE(0. 
24)-(0.40),PSET:HLINE-(56,40),PS 
ET:HLINE-(56,24),PSET 

3 HPAINT(28,28),2,4:rlLINE(88,16) 
-(88.20).PSET:HLINE(60.20)-(116. 
40).PSET.B:HLINE(60.27)-(116.33) 
,PSET,B:HPAINT(88,23).2,4:HPAINT 
(88,30).3,4:HPAINT(88,36),5,4:HD 
RAW"BM120,18D20R16U8R36U4L36U8L1 
6":HPAINT(130,28).6.4:HLINE(120, 
22)-(136,34).PSET,B 

4 HGET(0.0)-(56.24).1:HGET(0.8)- 
( 56,32 ), 2 :HGET( 0,16) -(56,40). 3 :H 
GET(180.16)-(236,40).4:HGET(60,0 
)-(116.24).5:HGET(60,8)-(116,32) 
,6:HGET(60.16)-(116,40).7:HGET(1 
20, 16) -( 176,40 ).8:HCLS:HC0L0R2:H 
LINE(4,4)-(316,28),PSET,BF:HLINE 
(4,32)-(316,182),PSET.B 

5 HCOLOR3:FORF=16TO208STEP96:FOR 
G=65T0161STEP48:HLINE(F,G)-(F+88 
,G+16),PSET,BF:NEXTG,F:HC0L0R4:H 
PRINT(7,9). , '0 ,, :HPRINT(19,9),"W M : 
HPRINT(31.9),"E":HPRINT(7,15),"A 



":HPRINT(19,15),"S":HPRINT(31.15 
),"D":HPRINT(7.21). M Z":HPRINT(19 
.21),"X":HPRINT(31,21),"C 

6 I=0:J=61:HPUT(C(K).D(K))-(C(K) 
+56.D(K)+24),4 

7 J=J- 1:HPRINT( 1.1). "SCORE :":HPR 
INT(19,l),"rlI-SC0RE:":HPRINT(16. 
2),"TIME:":HC0L0R2:HLINE(56,8)-( 
136,15),PSET.BF:HLINE(232,8)-(30 
4,15).PSET,BF:HLINE(168.16)-(190 
,23).PSET.BF:HC0L0R4:HPRINT(7,1) 
,I:HPRINT(28,1),H:HPRINT(21.2).J 

8 IF I>H THENH=I:J=J+1:GOT07 

9 IF J<1 THEN HPRINT(15,5),"GAME 
0VER":HPRINT(4,23),"Do you want 
to play again (Y/N)?":R$=INKEY$ 

:IFR$="Y"THENHCOLOR0:HLINE(120,3 
8)-(192,47).PSET,BF:HLINE(32,184 
)-(288,192),PSET,BF:HC0L0R4:G0T0 
6ELSEIFR$="N"THENPOKE&HFFD8.0:WI 
DTH32:ENDELSE9 

10 K-=RND(9):L=RND(2):IF L=1THENM 
=0ELSEM=4 

11 N=M+1:0=N:P=1 

12 HPUT(C(K),D(K))-(C(K)+56,D(K) 
+24),0:Q$=INKEY$:IF Q$<>"" THEN 
G0SUB17 

13 0=0+P 

14 IF 0>N+2 THEN 0=N+2:P=-1 

15 IF 0<N THEN HPUT(C(K) ,D(K) ) - ( 
C(K)+56.D(K)+24),4:G0T07 

16 G0T012 

17 F0RS=1T09 

18 IF ASC(Q$)=E(S)THEN19ELSE20 

19 HPUT(C(S),D(S))-(C(S)+56.D(S) 
+24).8:HPUT(C(S).D(S))-(C(S)+56. 
D(S)+24).4:S0UNDE(S),1:IF S=K TH 
EN G0SUB21 

20 NEXTSrRETURN 

21 IFL-1THENI-I+0:HPRINT(1.2) ."0 
UCH!":G0SUB24:HLINE(8,16)-(48.24 
),PSET.BF 

22 IFL=2THENI=I-(0-4):HPRINT(34. 
2)."B00M!":G0SUB24:HLINE(272.16) 
-(312,24).PSET.BF 

23 HC0L0R4: RETURN 

24 HCOLOR2:FORT=1TO50:NEXTT:RETU 
RN 



Quickgrass 

by Joshep Pendell 




Quickgrass is a game where you must move your lawn mower 
over grass blades that are really growing fast. The object of the 
game is to prevent the grass from reaching the top line for as long 
as possible. The grass will grow faster and faster, the longer you 
play. When a blade of grass finally reaches the top, a score is given 
based on how long you survived. 



The lawn mower is controlled with the right joystick. The game 
operates more smoothly if the high-speed poke is used, and the 
variable SC holds the score. OLD is the last x position of the lawn 
mower stored for erasure later. J is how much higher the grass will 
rise when it grows. D is the rate at which J increases to make the 
game harder. Array A holds the image of the lawn mower, while 
Array B holds a block of the background color to erase the lawn 
mower when moved. A simple modification would be to set D 
(initialized in Line 130) to a higher number than 10 to make the 
game a little easier. 
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The listing: QGRASS 

" COPYRIGHT 1989 FALSOFT.INC 

1 REM QUICKGRASS 

2 REM BY JOSEPH PENDELL 
10 DIM A(20) 

20 DIM B(20) 

30 DIM H( 115) 

40 PMODE 1.1:PCLS 

50 DRAW"C2BM0,192;U1;R1;U1;R1;E1 

;U1;R2;D1;F1;R1;D1;R1;D1;" 

60 GET(0,100)-(8,192),A 

70 PCLS:SCREEN1.0 

80 GET(0,100)-(8,192),B 

90 C0LOR3.1 

100 LINE(0,99)-(255.99),PSET 

110 COLOR 4,1 

120 FORI=1TO115:H(I)=0:NEXTI 

130 SC=0:D=10:J=25:OLD=0 

140 X=JOYSTK(0)*220/63+10 

150 PUT(OLD.100)-(OLD+8,192).B:P 

UT(X.100)-(X+8.192),A:FORI=(X/2) 

-4 TO (X/2):H(I)-0:NEXTI:OLD-X 

160 Q=RND(115):H(Q)=H(Q)+RND(J) 

170 LINE((Q+4)*2,192)-((Q+4)*2,1 



92-H(Q)),PSET 



180 
190 
200 
210 
220 
":SC 



SC=SC+1 
IFRND(D)-1 
IF H(Q)<92 
'GAME OVER 
CLS:PRINT"QUICK 



THENJ=J+5 
THEN 140 



GRASS SCORE* 



Submissions to "Novices Niche" are welcome from 
everyone. We like to run a variety of short programs -that 
can be typed in at one screen sitting and are useful, edu- 
cational and fun, Keep in mind, although the short pro- 
grams are limited in scope, many novice programmers 
find it enjoyable and quite educational to improve the 
software written by others. 

Program submissions must be on tape or disk. We're 
sony, but we cannot key in program listings. All pro- 
grams should be supported by some editorial commen- 
tary explaining how the program works, Ff your submis- 
sion is accepted for publication, the payment rate will be 
established and agreed upon prior to publication. 



'WM fM^S^^mM^0^£W:B- 



Qi6raCter Software 'Presents 

A BASIC UTILITIES DISK FOR YOUR C0C03 

FILE EDITING utility with 36 search/replace patterns quickly edits 
BASIC files. Insert/delete mode tool Block loading handles files 
larger than memory. Auto-backup ol original file. 

DESKTOP environment for your BASIC program disks. Run 
programs from an on-screen directory. Point and click to copy, 
rename, kill files. Disk memos remind you of file contents. Supports 
1-4 drives under standard Radio Shack DOS. A must-have utility. 

INTERACTIVE GRAPHICS with Rubber band lines, rays, boxes, 
circles, ovals, arcs, polygons, starbursts, connect-the-dots. freehand 
drawing, variable text sizes, horizontal/vertical flips, more! USER- 
FRIENDLY. Self-centering joystick required (Pmode4). 

SUPER-CALCULATOR has inverse trig functions, pi, int, +/-. 1/x. 
square, cube, roots. 10 memories and more! Plus bonus calculator 
subroutine (9 functions) uses only 4 screen lines. 

NOTEPAD allows simple text editing from within your BASIC 
program. Insert, overwrite, delete, word-wrap, print and disk 
functions. 

HIRES UTILITY subroutines display input in HSCREEN graphic 
modes and transfer numeric/string variables to your program. Time 
your routines with our on-screen countdown timer. Demo included. 
BEST for adventure and arcade-type games where leaving the hires 
screen is inconvenient. 

ONLY $14.95 + $2.00 CHECK, M.O. OR COD 

/^5\ GIBRALTER SOFTWARE 

65 BLUFF AVENUE 
ROWAYTON, CT 06853 
(203) 838-9284 



RAINBOW 



NO SOFTWARE PATCHES NEEDED!!!!!! 




The ONLY joystick adapter you will 

ever need ! 

Replaces TANDY Hi-Res adapter! 

Replaces CQLORWARE Hi-Res adapter! 

Acts as a LORES (no) adapter! 

All at the flick of a switch!! 

All this for only . . . $40 

HAWKSoft keyboard extend cable $25 

DOMINATION "risk"-like war game $18 

MYD0S the extended DOS for you! $15 

SASE for more info and price list. 

HAWKSoft P.O. Box 7112 

Elgin, II. 60121-7112 

(312)-742-3084 eves & ends 

S/H ( US & CAN ) always included 
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Turn of the Screw 



Disk Track Tracer 



by Tony DiStefano 

Contributing Editor 



The other day I was visiting a friend 
who showed me a new toy for his 
Atari ST computer. There was a 
device hooked up to his disk drive 
— a small box with two LED 
displays. When I first saw it, the displays 
read 00. "So what!" I exclaimed. "What 
does it do?" 

He demonstrated it by accessing the 
drive. It whirred a little, then the LED 
display started to change. In fact, every 
lime the disk drive stepped, the display 
changed. Upon further investigation of the 
new gadget. I learned that it was a track 
tracer. The LEDs always display the track 
number on which the disk drive's head is 
sitting. What a novel idea! Of course I had 
to have one for my computer as well. So 
after my visit I went home with one thing 
on my mind — the track tracer. He had 
spent a good sum of money for it and 
waited weeks for it to arrive from England. 
I didn't want to pay that much, nor did I 
want to wait that long. But I really wanted 
it, and once I get an idea in my head, there 
isn't much I can't do. I sat and thought, 
grabbed a sheet of paper and a pencil, and 
came up with something. 

I looked in my trusty TTL manual (The 
TTL Data Book Volume 2). and a project 
began to grow into two sections — the 
counter and the display driver. Since I 
wanted a project with as few parts as pos- 
sible, because fewer parts mean less wiring 
and less cost, the first thing I came across 
was a typical display chip, the 74LS48 or 
7448. It is a BCD (Binary Coded Decimal) 
to seven-segment display decoder driver 
with built-in resistors. 



Tony DiStefano is a well-known early spe- 
cialist in computer hardware projects. He 
lives in Laval Ouest, Quebec. Tony's user- 
name on Delphi is DISTO. 



Look at Figure 1 . There are two 74LS48s 
that serve to drive two seven-segment dis- 
plays. This type of chip requires a display 
that has a common cathode. In Figure 1 I 
left out the pin numbers for the display 
because there is no standard for display 
pin-outs. When you use them, make sure 
that the pin-out comes with it. The impor- 
tant thing is that the segments are labeled 
with letters A through G. Then the only 
other pin you need will be ground, which is 
what the diagram shows. 

If the display is too dim, you may want 
to add a few IK resistors. You need seven 
resistors for each display. Tie one side of 
each resistor to +5 volts and the other side 
to each of the outputs, labeled A through G. 

There are four inputs to the 74LS48 for 
the digits. Remember, you want to display 
the numerical digits through 9 for each 
display, and three bits give you only eight 
combinations. A fourth bit is needed, which 
gives you 16 combinations — a few too 
many. I know. Just make sure you don't 
output a number greater than nine. 

For your own interest, try inputting a 
higher number. The display shows gar- 
bage. There are other display chips that 
display numbers 10 through 15 as letters A 
through F, which could be good for proj- 
ects requiring displays in hcxidecimal. For 
now, you need only decimal. The other 
inputs of the 74LS48 are not used in this 
case. Refer to your TTL manual for a de- 
scription of these pins. 

That takes care of the display side of 
things — now let's look at the other side. 
To choose the chip, I took a look at what 
signals were available. The tracks are ac- 
cessed by a stepper motor, which needs two 
signals — a step signal and a direction. In 
digital terms you need a chip that is able to 
count up and down — an up/down counter. 
After studying the TTL index, I came up 
with the 74LS 190, which is a synchronous 



up/down counter. It's just what you need, 
and it's all in one chip. Remember, there is 
always more than one way to do any given 
thing in TTL. I used the easiest way. 

Let's go through this chip one pin at a 
time. There are four outputs, otherwise 
known as the count number, that feed the 
display driver. Look at Figure l.Ul.Pin 14 
is the CLK, or clock input. Every time a 
pulse appears on this pin, the counter counts 
by one. The direction it counts depends on 
the D/U (down/up) pin. which is connected 
to the direction pin on the disk drive — one 
pulse, one count. When the count goes up to 
and passes 9, the RCO (Ripple Count 
Overflow) clocksthe next digit. In theother 
direction, when goes down to 9, the RCO 
substracts from the next digit. 

Next is Pin 4, an enable pin (G for Go). 
This pin is connected to the drive enable pin 
of the drive and is necessary because the 
circuit can keep track of only one drive. If 
your system has more than one drive, the 
counter is only activated when the appro- 
priate drive is accessed. You must connect 
this pin to whatever drive you want to keep 
track of. The pin numbers for each of the 
four drives accessible on the CoCo are as 
follows: 



Drive 


Pin Number 





10 


1 


12 


2 


14 


3 


32 



Connect the DR0 pin to whatever drive you 
want to keep track of. 

We now have an up/down counter with 
direction. The next problem is that the cir- 
cuit must have a point of reference. When 
you first turn on the computerand drive, the 
circuit does not know what track the drive 
is sitting on — it could be on any track. The 
only reference point is another available 
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SEE TEXT 









» CZ 
p. 10 uf 


- C3 - 
. 1 uF 











/ SEG DISPLAY 
COMMON CATHODE 



. 1 uF 



Figure 1 



pin on the drive, Ihe Track Odetector. I used 
this pin to load the counters with a preset 
number, which in this case is 0. Examine 
Figure 1 again and look at the four inputs, 
A through D. They are used to load a 
number into the counter. In our case we 
need a zero, so all four inputs are soldered 
to ground. Pin 1 1 is used to load the value 
of A through D into the outputs of the 
counter. The TRKO signal is active as long 
as the drive heads sit on Track 0. As soon as 
the stepper motor hits Track 0. a logical low 
is seen on TRKO. This causes a pulse to be 
carried through C 1 . A short pulse is all that 
is needed to load the 74LS190 with 0. It is 
important to note that this counter does not 
properly display the track number until the 
First access to Track 0. You can easi ly force 
this by doing a DIR with the drive door 
open. Disk basic tries to read the disk, gets 
an error and seeks to Track 0. Then bingo, 
our circuit is now also calibrated. 

In theory, the track tracer works well. 
But when I tried it. noise on the drive line 
made the counter unreliable. The two in- 
verters to the step input are used to clean up 
that signal. 

Construction Notes 

There are many ways to put this project 



together. I'll give you some hints and leave 
it up to you to decide what is best for you. 
The simplest way is to build it inside your 
drive case if you have room. The circuit is 
built on a small proto-board: mount all 
components using sockets because it's safer. 
Not shown in Figure 1 are the +5 volts and 
ground for the ICs — U 1 , U2. U4 and U5. 
The +5-volts pin is 16; Ground is Pin 8. For 
U7, +5-volts is on Pin 1 4 and ground is on 
Pin 7. Capacitors C3 and C4 should be 
phyically close to Ul and U4. You can 
position C2 just about anywhere, using Ihe 
+5 volts available from the power supply of 
the drive. 

If you want to get fancy, mount the 
circuit inside a small utility box, build a +5- 
volt power supply and connect it to your 
drive cable using another 34-pin connec- 
tor. A four-position switch can also be used 
to select the drive you want to keep track of. 
or you can even double this circuit and 
watch two sets of digits. Since all the sig- 
nals needed are inside your disk controller, 
you can mount the circuit inside your con- 
troller, cut a hole in the cover, and mount 
the display on the outside. You can use big 
or small displays, depending on where you 
want to mount them. I won't detail how and 
where to mount this; if you understand the 



circuit and can build it. you know enough 
on how to mount it. Here is what you need 
for this project: 



Part 


Description 


U1.U4 


74LS190 


U2.U5 


74LS48 or 744S 


U3,U6 


7-segment display. 




common cathode 


U7 


74LS04 


CI 


10 pF capacitor 


C2 


10 uF capacitor 


C3.C4 


.1 uF capacitor 


Rl 


3.9K resistor 


Wise. Parts: 


Proto-board. 14 - IKre- 


si.siors.powe 


r supply, utility case and 


34 -pin connector. 



After it is built, tested and running well, 
what do you use it for? The original track 
tracer my friend has is advertised as a tool 
for tracing what track software has ac- 
cessed. The reason I built it is because I 
thought it was a neat conversation piece. I 
like things that flash and blink. When people 
come over and look at my set-up . . . well, 
you know! 



January 1990 THE RAINBOW 



41 



Wishing Well 



Learn to Give and Take 



by Fred B. Scerbo 

Contributing Editor 



If you have an idea for the "Wishing 
Well," submit it to Fred do the rain- 
bow. Remember, keep your ideas spe- 
cific, and don't forget this is basic. All 
programs resulting from your wishes 
are for your use, but remain the prop- 
erty of the author. 



Coming very soon is the tenth 
anniversary of the introduc- 
tion of the Color Computer 
by Tandy. Some CoCo loy- 
alists may even remember 
when it was called the TRS-80 Color 
Computer. Over the years it has been known 
by different names. Still the one 1 most like 
to call it is practical. 

When it comes to using a BASIC lan- 
guage that is easy to manipulate, nothing 
beats the CoCo*s Extended Color BASIC. 
The ease of using this language made this 
month's program a breeze to write. The 
program is called Primary Math Driller, 
and it is the newest version of a program 
called Multi Math Driller, which appeared 
previously in this column. 

Several years ago I wrote a program 
called Multi Math Driller to help students 
drill math tables in multiplication. Driller 
was so popular that I created a new version 
with division drills called Driller 2. Re- 
cently, however, many readers have sug- 
gested educational programs for younger 
CoCo users, particularly primary school 



Fred Scerbo is a special needs instructor 
for the North Adams Public Schools in 
North Adams, Massachusetts. He holds a 
master's in education and has published 
some of the first software available for the 
Color Computer through his software firm. 
Illustrated Memory Banks. 



Students. Multiplication and division drills 
are of little use to a child who has not yet 
mastered addition or subtraction. 

Now there is Driller 3, a program that 
drills the child in both addition and subtrac- 
tion. I have also added some new features 
to the subroutines that create this program. 
The first two versions give only a raw score 
(i.e., five wrong out of 25 tries). The new 
version includes the standard score card, a 
feature that appears in many of my educa- 
tional programs. 

The score card may be activated by 
pressing the @' key. I must warn you, 
however, thai it may nol respond the first 
few times you press it. (Jiggle it a few 
limes.) The reason for this has to do with 
how INKEY$ works. Usually you can use a 
line such as X$-INKEY$ : IF X$=. (If you use 
this method, the keyboard may get a few 
steps ahead of you. ) Therefore, pressing the 
space bar too many times might give you a 
false response as the keyboard gets ahead 
of itself. Instead I used IF INKEY$- to check 
the keyboard so no false responses are 
recorded. At the same time, however, you 
must do a little jiggling to make it recog- 
nize the @ key. It is a small trade-off to 
ensure no unnecessary responses are re- 
corded. Believe me, there is nothing more 
frustrating for some children than to have 
the computer misread a response. 

Using the Program 

The program is easy to run, and you can 
also tailor il to meet your needs without too 
much trouble. 

There is a slightly different title card 
than usual on this program. Throughout the 
entire program Driller 3 uses the letter set 
that the CoCo TitleMaker program uses. 
Pressing any key sets up your choices. 
Press A for Addition or S for Subtraction. 
The next choice asks you to pick the speed 
of the program. The fastest is 1 while 9 is 



the slowest. I suggest that anyone trying the 
program for the first lime start with 9. The 
next question asks you to pick the desired 
tables from one to nine. The number you 
select is added to or subtracted from a 
random number from 1 to 9. 

Next the screen asks if you want the 
tables assorted. Answering Yes mixes in all 
tables lower than the number you have 
selected for the tables. Selecting No gives 
you only the table number you selected. 
Using the Assorted option is really best, 
especially when using subtraction. In sub- 
traction, if you select nine (9) and No for 
assorted, you only get the same problem 
over and over again (9-9=0). This is be- 
cause only one number(9) is either equal to 
or greater than the selection you chose. For 
example, selecting eight ( 8) with no assort- 
ment only allows two problems (9-8=? and 
8-8=?). Therefore, use the assortment when 
using subtraction. 

Drilling 

The rest of the program is very much 
like Driller I and 2 — the screen displays 
a colorful oil rig; the top of the screen 
displays a problem in large numbers and 
letters: and at the bottom of the screen a 
field of answers runs by. When you see the 
correct answer come under the rig. press 
the space bar or the fire button on the right 
joystick. You may want to press it just 
before the answer comes under the rig. If 
some of the answer goes by. the program 
records a miss instead of a hit. 

If the answer is coiTect, the screen shows 
a colorful display and the entire problem at 
the lop of the screen. If you score a miss, the 
screen says WRONG and TRY AGAIN. If the 
user gels 20 consecutive correct answers 
without an error, the oil well erupts in a 
geyser. It is a very nice display when you 
hit pay dirt! 

As I mentioned earlier, jiggling the @ 
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key during a problem advances you to the 
scorecard. 

Custom Changes 

Notice I have included the old MC-10 
routines for those of you who still use the 
machine. Some of you may find that 20 
problems are too few. If that is the case, you 
can change Line 25. which reads 25 
BR-30:YS-20. The variable BR is the maxi- 
mum number of tries; YS is the number of 
problems. You may increase these values 
to any number and save the program. For 
example. 25 BR-60 : YS-50 allows up to 60 
tries of 50 different problems. I thought it 
was much easier to have the value set in the 
program rather than add another option at 
the beginning of the program. Too many 
options tend to scare the user. 

Driller 3 or Primary Math Driller is 
colorful, interesting and can have an im- 
pact on your child's learning process. Let 
me know what other types of programs you 
would like to see in coming months. □ 









10 CLS0 




f 




» /-. 


15 CLEAR500 




V 


/i> zwb 

130 157 


20 FOR ZZ=1T096:BB$=BB$+CHR$U28 

):NEXTZZ 

25 BR=30:YS=20 






200 83 




280 123 

385 100 


30 REM IF MC-10 THEN MC-15360 
35 MC-0 




445 28 


40 DIM A(45.9).B(4.12) 




500 221 

545 148 


•45 FOR1=2T011:FORY-1T09:READ AC I 
,Y):NEXTY.I 




650 8 


50 FOR1=19T044:FORY=1TD9 




725 22 

795 103 


55 READ A(I.Y) 
60 NEXTY.I 




860 39 

915 148 


65 F0RI-1T04:F0RY-1T012:READ B(I 
.Y):NEXTY.I 




END 133 


70 FOR ZZ=0TO31:PRINT@ZZ.CHR$(18 
8)::NEXT ZZ:F0R ZZ=320TO351 : PRIN 
T@ZZ.CHR$(179)::NEXT ZZ:FORI=0TO 




21:SET(0.I.4):SET(63.1.4):NEXT 


The listing: DRILLER3 


75 W$="PRIMARY" :C-64:L-34:G0SUB5 




90:W$-"MATH":C=32:L-136:GOSUB590 


1 REM***********^***** ********* 


: W WDRI LLER" : C-16 : L-227 : G0SUB59 


2 REM* PRIMARY MATH DRILLER * 





3 REM* BY FRED B. SCERBO * 


80 REM <SHIFT><0> FOR LOWERCASE 


4 REM* 60 HARDING AVENUE * 


85 R$-CHR$( 128 ) : PRINT0417 . "by"+R 


5 REM* NORTH ADAMS. MA 01247 * 


$+"fred"+R$+"scerbo"+R$+R$+"copy 


6 REM* COPYRIGHT (C) 1989 * 


right"; 


7 prr^************************** 


90 P0KE1467+MC.49:P0KE1468+MC.57 




u 



^ DISTO SUPER RAM III 512K UPGRADE $90 (free software included) 



CRC COMPUTERS 



®«® 



4 IN 1 MULTIBOARD ADAPTER 130$ 
Parallel printer port, real time clock, Serial port, hard disk adapter 



Mini Controller 




The only floppy disk Controllers that 
ELIMINATES the need of a Multi-Pak 



The No-Extra-Cost Controller 

■ 2 DOS Switcher (switch included) 

■ NO clumsy lumpers to move 
• Accepts 24 or 28 pin EPROMs 

/75$DOS included (add 10$ tor 2nd DOS) 



See page 123, March 89 Rainbow tor more into 



RS-232 SuperPack 55$ 

• A Siand-Alone (Multi-Pak rqd.) adapter thai gives 
the user a true RS-232 Serial Port • Completely 
compatible with OSS's ACIA software. 

• Compatible with soltware that requires 
the Tandy Deluxe RS-232 Pack 

• DB-25 cable included. 




Super Controller " 

Along with the included DOS. 

plug-in three mote software selectable DOSes 

or 2764 or 27128 EPROMs burned to your liking. 

The internal M.E.B (Mini Expansion Bus) lets you add 

DISTO's incredible Super Add-ons. 

99$/110$(2 DOSes) 



See page 122, March 89 Rainbow for more Info 



/ 



RADIO SHACK (R) which has more experience 
with COCO controllers than any other supplier 
now carry the DISTO SUPER CONTROLLER]! 




SUPER ADD-ONS 



Super Controller 



MEB Adapter II 35S 

To plug in your DISTO Super 
Add-Ons (Multi-Pak required) 

Super RAM 3 
ZeroK Board 25$ 

35$, 



■ Under OS-9: 



RGB to Monochrome 
Video'Audio Adapter 

See page 123 March Rainbow 89 



NOW AVAILABLE AT YOU 
LOCAL RADIO SHACK STORE 
Part no: 90-2009 

B.'Mered Read'Wme sector achieved without halting the 
Continual use ot keyboard even while reading or writing to 
• System's clock no longer looses time during Read 8 Write 
• NMI is blocked S translerred to IRQ in soltware 
lor low CPU overhead • Completely Interrupt driven lor lasl 
& smooth Multi-Tasking operations. .. ~ n » 

■ Drivers written by KEVIN DARLING ■ • 3U: > 



Don't let anyone tell you otherwise, the WD 1773 
does not have any problems with COCO 3s. , 
'o It 




3 in 1 Multi Board Adapter 

Parallel Printer Port, Real Time Clock 
and a true RS-232 Serial Port. 
External DC adapter required. 
(OS-9 Driver included) 
al Time Clock & Printer Interface 
-9 Driver (20S) 
EPROM Programmer 
Hard Disk Adapter 
Works with SASI & SCSI interlace. 
No Multi-Pak needed if used with SCI or SC2. 
Compatible with RGB OOS and Burke & Burke . 
Hyper I/O. OS-9 Driver included. 
Disk Adapter with RS-232 



CRC COMPUTERS INC. 



^0' 11 Boul. Des Laurentides, Laval, (Quebec), Canada H7G 2S3 Sorry: No personal cheques .. cij qc7 niqt; 
Call for Canadian Prices Include S&H of $4 or $8 if order exceeds $75 Master Card and visa Accepted ' JIH JOf UIJJ 
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: P0KE1469+MC . 56 : POKE1470+MC . 57 


315 IF SC-1THEN325 


1:NEXTI:SET(30-I*2.11-I.2):SET(3 


95 GOSUB730:FORI-417TO480:PRINT@ 


320 IF E>F THEN 310 


3+1*2.11-1.2) 


l.CHR$(128);:NEXTI 


325 LN-F : I-E+2 : L-l 5 1 : C-l 1 2 : GOSUB 


515 F0RI=1T012:SET(13- 1.2+1*2.2) 


100 PRINT@452."a"+R$+"ddition"+R 


680 : I-F+2 : L-135 : GOSUB680 


:SET( 50+1.2+1*2. 2) :SOUND230. 1 : NE 


$+"or"+R$+R$+"s"+R$+"ubtraction" 


330 IF SC-0THEN 340 


XT1:FORI-1TO20:SOUNDRND(230).1:N 




335 AN=E+F:G0T0345 


EXT 


105 POKE1475+MC.40:POKE1477+MC.4 


340 AN-F-E 


520 CLS0:W$="YOU HIT" :C-32 : L-2: 


1 : P0KE1485+MC . 32 : P0KE1488+MC . 32: 


345 F$-STR$(AN):F0RI-1T06:G-RND( 


GOSUB590:W$-"PAYDIRT":C-64:L-98: 


POKE1489+MC.40:POKE1491+MC.41 


18):H$=STR$(G):F$-F$+" "+H$:N 


GOSUB590 


110 X$-INKEY$:IFX$=""THEN110 


EXT1 


525 W$="WITH A":C-48:L-196:G0SUB 


115 IFX$-"A"THEN SC-1:GOTO130 


350 J$-LEFT$(F$.32) 


590:W$="PERFECT":C-16:L-290:GOSU 


120 IFX$-"S"THEN SC-0:GOTO130 


355 PRINT@448.J$: 


B590 


125 GOTO110 


360 L$-RIGHT$(J$.31):M$-LEFT$(J$ 


530 W$-"SCORE" : C-112 : L-390 : GOSUB 


130 F0RI-451T0478:PRINT@I.R$::NE 


.1):J$-L$+M$ 


590 


XT:PRINT@353."select"R$"speed"R$ 


365 FORP-ITO DL : NEXTP: IFTR->BR T 


535 GOSUB730 


'•from"R$"fast"R$"to"R$"slow , '::GO 


HEN540 


540 CLS0:W$="OUT OF" : C-16: L-6 : GO 


SUB140 


370 IFINKEY$-CHR$(32)THEN410 


SUB590:WJ-STR$(TR)+" TRIES" :C-48 


135 G0T0145 


375 IFINKEY$-"@"THEN945 


:L-96:GOSUB590:W$-"YOU HAD" 


140 W$-"l TO 9":C-112:L-422:G0SU 


380 REM IF MC-10 DELETE LINE700 


545 C-32:L-196:GOSUB590:W$=STR$( 


B590: RETURN 


385 IFPEEK(339)-254THEN410 


WR) : C-64 :L=307-(LEN(W$)*3): GOSUB 


145 X$-INKEY$:IFX$-""THEN145 


390 NP-NP+1:IFNP=150THEN400 


590 


150 X-ASC(X$):IFX<49THEN145 


395 G0T0355 


550 W$="MISSES":IF WR-1 THEN W$- 


155 IFX>57THEN145 


400 PRINT@0.BB$; :W$-"THINK" : C-64 


" MISS" 


160 K-VAL(X$):DL-K*8 


:L-6:GOSUB590:SOUNO1.2:SOUNO1.2: 


555 C-112:L-388:GOSUB590 


165 CLS0:W$="SELECT":C=32:L-4:GO 


S0UND1.2 


560 IFINKEY$-CHR$(13)THEN570 


SUB590:W$-"DESIRED":C-48:L-98:GO 


405 G0T0355 


565 GOTO560 


SUB590 


410 TR-TR+1:PRINT@431.CHR$(186)C 


570 PRINT@483."press"R$"enter"R$ 


170 W$-"TABLES" : C-16 : L-196 : GOSUB 


HR$(181)::PRINT@463,CHR$(138)CHR 


"f or"R$"your"R$"score" : 


590:W$="FROM":C=64:L-296:GOSUB59 


$(133); 


575 FORI-1TO1000:NEXT 


0:GOSUB140 


415 IF AN-VAL(HID${J$.15,4))THEN 


580 IFINKEY$=CHR$(13)THEN945 


175 X$-INKEY$:IFX$=""THEN175 


425 


585 GOTO580 


180 X-ASC(X$):IFX<49THEN175 


420 G0TO475 


590 P-LEN(W$):FORZ-lTOP:I-ASC(MI 


185 IFX>57THEN175 


425 PRINT@0.BB$; 


D$(W$.Z.l))-46 


190 K=VAL(X$) 


430 F0RC-16T0112STEP32:W$-"C0RRE 


595 IFI-31THEN630 


195 CLS0:W$-"DO YOU" :C=80: L-5 :GO 


CT": L=3:GOSUB590:SOUNDC+1 . 1 : NEXT 


600 IFI-32THEN640 


SUB590:W$-"WANT THE" : C-l 12 : L-96 : 


C 


605 IFI-41THEN650 


GOSUB590:W$-"TABLES":L-196:C-64: 


435 PRINT@0.BB$; : I-F+2: L-0 : C-48 : 


610 IFI-42THEN660 


GOSUB590 


GOSUB680:PRINT@5.CHR$(128)CHR$(1 


615 IFI— 14THEN670 


200 W$-"ASSORTED" : C-32 : L-288 : GOS 


28): 


620 GOSUB680 


UB590 : W$-"Y " : C-16 : L-386 : G0SUB59 


440 IF SC-0THEN450 


625 GOT0675 


0:W$-"OR ":C-0:GOSUB590:W$-"N ": 


445 PRINT@5.CHR$(165)CHR$(170);: 


630 I-1:GOSUB705 


C-16:GOSUB590 


PRINT@36.CHR$(172)CHR$(173)CHR$( 


635 GOT0675 


205 PRINT@L+1.CHR$(190);CHR$<188 


174)CHR$(172);:PRINT@69.CHR$(164 


640 I=2:GOSUB705 


)CHR$(191)::PRINT@L+33.CHR$(128) 


)CHR$(168): :G0TO455 


645 GOT0675 


CHR$(188)CHR$(188)::SET(54.28.4) 


450 PRINT@36.CHR$(172)CHR$(172)C 


650 I-3:GOSUB705 


210 X$-INKEY$:IFX$="Y"THEN225 


HR$(172)CHR$(172): 


655 GOT0675 


215 IFX$-"N"THEN230 


455 WS-" ":GOSUB590:I-E+2:C-48 


660 I-4:GOSUB705 


220 GOTO210 


:GOSUB680 


665 G0T0675 


225 AJ-1:GOTO230 


460 PRINT@16,CHR$(147)CHR$(147)C 


670 L-L+2 


230 CLS0:GOSUB240 


HR$(147)::PRINT@48.CHR$(147)CHR$ 


675 NEXT:RETURN 


235 G0T0245 


U47)CHR$(147)::W$=" ": C-16: GO 


680 PRINT@0+L.CHR$(A(I.1)+C)CHR$ 


240 W$-"WHAT IS":C=16:L-3:G0SUB5 


SUB590:W$-STR$(AN):C-32:GOSUB590 


(A(I,2)+C)CHR$(A(I.3)+C): 


90:RETURN 


465 GOSUB730:PRINT@0.BB$::GOSUB2 


685 PRINT@32+L.CHR$(A(I.4)+C)CHR 


245 FOR ZZ-416T0447:PRINT@ZZ,CHR 


40:CR-CR+1:NEXT TP 


$(A(I.5)+C)CHR$(A(I.6)+C): 


$(188)::NEXT ZZ:FOR ZZ-480TO510: 


470 GOT0495 


690 PRINT@64+L.CHR$(A(I.7)+C)CHR 


PRINT@ZZ.CHR$(179); :NEXT ZZ 


475 PRINT@0.BB$: :W$="WRONG" :C-64 


$(A(I.8)+C)CHR$(A(I.9)+C): 


250 P0KE1535+MC.179 


: L-6 : GOSUB590 : SOUND20 . 1 : S0UND2 . 1 


695 L-L+4: RETURN 


255 E-29:F-34:FORG-10TO24STEP2 


:SOUND20.1:SOUND2.1 


700 GOTO700 


260 FORI-E TO F:SET( I .G. 5) :NEXT1 


480 WR-WR+1:PRINT@0.BB$; :W$-"TRY 


705 PRINTO0+L.CHR$(B(I .1)+C)CHR$ 


265 SET(E-1.G+1.6):SET(F+1.G+1.6 


":C-32:L-10:GOSUB590:FORI=1TO300 


(B(I.2)+C)CHR$(B(I,3)+C)CHR$(B(I 


) 


:NEXT:PRINT@0.BB$: :W$-"AGAIN" 


,4)+C): 


270 E-E-1:F-F+1:NEXTG 


485 C-96:L-6:GOSUB590:FORI-1TO30 


710 PRINT@32+L.CHR$(B( 1.5)+C)CHR 


275 F0RI-12T026:SET(31.I,3):SET( 


0:NEXT:PRINT@0.BB$::GOSUB240:IF 


$(B(I.6)+C)CHR$(B(I.7)+C)CHR$(B( 


32.I.3):NEXTI 


NP>100THEN NP-0 


I.8J+C): 


280 IF SC-0 THEN290 


490 GOT0355 


715 PRINT@64+L.CHR$(B(I.9)+C)CHR 


285 PRINT@110."plus"::GOTO295 


495 IFTROYS THEN540 


$(B(I.10)+C)CHR$(B(I.11)+C)CHR$( 


290 PRINT@109. "minus": 


500 PRINT@0.BB$: : FOR JJ-448T0479 


B(I.12)+C);:L-L+5:RETURN 


295 FOR TP-1TO YS:NP~0:IF TR->BR 


: PRI NT@JJ . CHR$( 159 ) : : NEXTJ J 


720 PRINT@Q.CHR$(154); :PRINT@Q+3 


THEN540 


505 FORI-28TO10STEP-1:SET(31.I.2 


0.CHR$(145)CHR$(128)CHR$(154)CHR 


300 IF AJ-0 THEN E-K 


):SET(32.I.2):SOUND230.1:NEXTI:F 


$(145): 


305 IF AJ-1 THEN E-RND(K) 


ORI-1TO7:SET(30-I*2.10-I.2) 


725 PRINT@Q+63,CHR$(153)CHR$(155 


310 F=RND(9) 


510 SET(33+I*2.10-I.2):SOUNO230. 


)CHR$(152)::PRINT@Q+96.CHR$(152) 
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: RETURN 


.140.140.140 








.128.140.128 


730 FORI-1TO1500:TU-RND(9999) 


820 DATA 143.140 


139 


143,128 


143 


900 DATA 143.128.143.143.128.143 


735 REM MC-10 DELETE LINE1380 


.140,140.136 








.140.140.140 


740 IFPEEK(339)-254THEN750 


825 DATA 143.140 


140 


143,140 


140 


905 DATA 139.128.135.141.131.142 


745 IFINKEY$=""THENNEXT 


.140.140.140 








.128.140.128 


750 RETURN 


830 DATA 143.140 


140 


143.140 


140 




755 DATA 135,140,139.143,128.143 


.140.128.128 








915 DATA 139.128.135.132.143.136 


.132.140.136 


835 DATA 143,140 


140 


143.132 


143 


.128.140.128 


760 DATA 129.143.128.128.143.128 


.140.140.140 








920 DATA 140.140.143,131.140.128 


.132.140.136 


840 DATA 143.128 


143 


143.140 


143 


.140.140.140 


765 DATA 142.140.139.131.140.129 


.140.128.140 








925 DATA 143.130.129.143.143.132 


,140.140.140 


845 DATA 132.143 


136 


128.143 


128 


,136.143,140.128.128.140 


770 DATA 140.140,139.140.140.143 


.132.140.136 








930 DATA 143.139.128.143.143.132 


.140.140.136 


850 DATA 140.141 


142 


128,133 


138 


.139.143.140.128.132.140 


775 DATA 143.133.138.140.141.142 


.140.140.136 








935 DATA 143.128.128.143.143.134 


.128,132.136 


855 DATA 143.129 


142 


143.141 


130 


.137.143.132.136.132.136 


780 DATA 143.140.140.140.140.143 


.140.128.140 








940 DATA 141.130.129.142.129.134 


.140,140.140 


860 DATA 143.128 


128 


143,128 


128 


.137.130.140.128.128.140 


785 DATA 143.140.140.143.140.143 


.140.140.140 








945 CLS:PRINT@101."YOU USED"TR"T 


.140.140.140 










RI ES AND" : PRINT@165 . "ANSWERED"CR 


790 DATA 142.140.143.128.135.136 


870 DATA 143.140 


143 


143.128 


143 


"CORRECTLY" 


.132.136.128 


.140.140.140 








950 PRINT@229. "WHILE DOING"WR"WR 


795 DATA 143.140.143.143.140.143 


875 DATA 143.140 


143 


143.140 


140 


ONG . " : NQ-CR+WR : I FNQ-0THENNQ-1 


.140.140.140 


.140.128.128 








955 MS-INT(CR/NQ*100):PR1NT@293. 


800 DATA 143.140.143.140.140.143 


880 DATA 143.140 


143 


143.129 


143 


"YOUR SCORE IS"MS"5S." 


.140.140.140 


.140.140.142 








960 PRINT@357. "ANOTHER TRY (Y/N) 


805 DATA 135.140.139,143.140.143 


885 DATA 143.140 


143 


143,141 


,130 


?" • 


.140.128.140 


.140.128.140 








965 X$~INKEY$:IFX$-"Y"THENRUN 


810 DATA 143.140.139.143.140.139 


890 DATA 143.140 


140 


140,140 


,143 


970 IFX$-"N"THENCLS:END 


.140.140.136 


.140,140.140 








975 G0T0965 


815 DATA 143.140.140.143.128.128 


895 DATA 140.143 


140 


,128.143 


.128 


/«\ 



Dedicated to computers and music - 



A full range of well supported music programs that are compatible with with each 
other. Most run on CoCo's 1 , 2, or 3 with 64K of memory. 

• Good programs that don't skimp on delivering what counts \\\ 
the most-performance and sound! 

• Knowledgable and friendly sales personnel who can 
give you help after the sale. 




Lyra, the full featured music editing program. Enter and hear music you never thought you could play! 
Super easy to use. Put notes on a music score with a mouse. Play 8 voices on your TV or connect to your 
MIDI synthesizer (comes with a MIDI cable). Print program included. See Nov. 1989 review. Only S59.95 

Lyra Lybrary, a full featured collection of music for Lyra. 18 disks (over 375 titles) for S125 or S14.95 per 
disk, <?/-S20.00 per disk, your choice of titles. Send SASE for list of titles. 

The Lyra Companion, a 100 page book filled with everything you wanted to know about Lyra. See 
November 1989 Rainbow review. Just S9.95 

CoCo MIDI 3, the pro quality MIDI sequencer that lets you record from your MIDI synth and edit the 
music. See the October 1989 Rainbow review. Works with any CoCo with 64K memory. S150.00 complete 

(program and MIDI interface pak) 

Hoi CoCo, a 45 minute professionally recorded audio tape of 
original compositions by CoCo artists. You'll love it! S9.95 

Play music on your CoCo with Musica. Only S24.95 




Rulaford Research 

P.O. Box 143 

Imperial Beach, CA 92032 

(619) 690-3648 (evenings 6-10 PT) 
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Its about time you got organized 




You were one of those last- 
minute Christmas shoppers 
who were slowly convinced 
that the season to be jolly 
was someone's idea of a erne I 
joke. The past couple of months have 
magnified your procrastinating tendencies 
and overall disorganized way of life. And 
you actually believe a new year's resolu- 
tion will change things. Get a grip. You 
probably don't even have time to organize 
your time — but Calendar does. 

Calendar is a BASlCOy program written 
to run under OS-9 Level II. To run the pro- 
gram, make sure you are operating from an 
80-by-24 text or graphics screen. Before 
starting the program, use the chd command 
to select the directory in which the calendar 
file will be stored. Make sure gf x2 is in the 
current execution directory or loaded into 
memory. 

The program itself is menu-driven and 
uses arrow keys to make selections. Each 
selection is described as follows: 



Jon Saksa uses ihe CoCo to write software 
for his dairy farm as well as for personal 
use. Since OS-9 Level II became available, 
he uses BASIC09 exclusively. He can be 
contacted at Rt. I ,Bo.x86,Annandale,MN 
55302 



OS-9 Level II 



O 



Listing 1 : calendar 



PROCEDURE 
0000 
001D 
002E 
003D 
0054 
006F 
008A 
00A6 
00C9 
00D8 
00E4 
00F0 
00FD 
0118 
0122 
0140 
0155 
01 6A 
0175 
0188 
01 9B 
01AE 
01 C4 
01 DB 
01F5 
0203 5 
0233 
0256 
02 5 A 10 
02 6C 
02 6E 20 

02 8P 
02A2 
02CF 
02E4 
02E8 
02EA 
02FD 
030B 
030D 30 
0321 40 
0342 
0344 50 

03 6F 



calendar 

(* Calendar (c) Oct. 31, 1989 

(* Jonathan Saksa 

(* Rt. 1 Box 86 

(* Annandale, Mn. SS302 

DIM day_of_year,first_day: INTEGER; record (60) ; STRING; 50] 

DIM i, hour, min, date, mth, year : INTEGER 

DIM day(7) :STRING[3] ■• directory:STRING(29: 

DIM xpos,t_opts, select :BYTE; choices (7) .title: STRING(20J 

DIM ypos,fcolor,bcolor:BYTE 

DIM Dirpath: STRING [40] 

DIM que:STRING[l] 

RUN gfx2 ("clear") 

RUN get_date (hour, min, date, mth, year) 

day_of_j>ear : =0 

RUN iniz_cal (day_of_year, £irst_day . rrth, yoa r . day) 

xpos:=55 \ypos:=3 \t_opt3:="7 

fcolor:=0 \bcolor:=l \select:=l 

title :="Menu" 



choices (1) 
choices (2) 
choices (3) 
choices (4) 
choices (5) 
choices (6) 
choices (7) 



="Load File" 
="Edit File" 
="Save File" 
="Change Month" 
="Coming Events" 
="Change Directory" 
="Quifc" 



RUN menu (xpos, ypos, f color, bcolor, t_opt a . select . choices , title) 

ON select GOSUB 10,20,30,40,50,60.70 

GOTO 5 

RUN load£ile_cal (day_o£_year, record) 

RETURN 

RUN editfile cal (record, first_day. mth, year. day) 

RUN gfx2("curxy", 0,15) 

INPUT "Save edited calendar on d;3k (y/n) . , %quo 

IF que="y" OR que="r"" THEN 

GOSUB 30 
ENDIF 

RUN gfx2("curxy",0,lS) 
RUN gf x2 ( "erline" ) 
RETURN 

RUN savefile_cal(day_of_year, record) \ RETURN 
RUN chgmonth_cal (day^of _year , firs t_day . mth . year , day) 
RETURN 

RUN avent_cal (record, £irst_day,day_of_year. dote, mth, year, day) 
RETURN 
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0371 60 


RON g£x2("curxy",0, IS) 


0387 


INPUT "Enter new directory path: ".Dirpath \ CHD Dirpath 


03AE 


RON g£x2("eurxy",0,15) 


03C1 


RON gfx2("erline") 


03CF 


RETURN 


03D1 70 


END 


03D6 


END 


PROCEDURE 


menu 


0000 


PARAM Xpos.Ypos, f color, bcolor, Total options. Select : BYTE 


001B 


PARAM Choices (20) .Title: STRING [20] 


0030 


DIM Count : INTEGER; Que -.BYTE 


003D 


DIM C,R, First choice, Selection, Ysize: INTEGER 


0054 


ON ERROR GOTO 10 


005A 


SHELL "tmode -echo" 


0069 


R:=2 


0070 


Fir3t choice :=R+2 


007B 


Ysize :=Total options+10 


0086 


C:=l 


008D 


RON gf x2("owset",l,Xpos,Ypos, 20, Ysize, f color, bcolor) 


00B9 


PRINT " "; DATE$ 


00C0 


RON gfx2("curxy",C,R) 


00D7 


PRINT TAB (C+10-LEN (TRIMS (Title) ) /2-C) ; Title 


00F1 


R:=R+2 


00PC 


FOR Count=l TO Total options 


010D 


RUN gfx2("curxy",C,R) 


0124 


PRINT Count; " "; Choices (Count) 


0134 


R:=R+1 


013F 


NEXT Count 


01 4 A 


R:=R+1 


0155 


RON gfx2("curxy",C-l,R) 


01 6E 


PRINT "Current directory: "; 


0187 


SHELL "pwd" \R:=R+2 


0199 


Selection : =Select-l 


01A4 


RON gfx2("curxy",C-l,R) 


01BD 


RON gfx2("erline"> 


01CB 


PRINT 


01CD 


PRINT "Use the arrow keys" 


01E3 


RON gfx2("curxy",C-l,R+2) 







Load file — Used to load the current 
month's date file so you can enter or edit 
Calendar information. 




Edit file — Employs a simple screen 
editor to work with the date records. The 
editor is always in Insert mode, which 
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OS9 Level II BBS Release 3.0 

System camea complete and ready to run. Use the build in menus or create your own. Run your own programs or gamca on- line! Complete message system included. Pile 
transfer system supports Xmodem and Ymodom plus automatic validation with keyword searching! Even comes with its own terminal program Tree! Now includes ANSI graphics 
menus and editor! See board while it runs! For a DEMO call (50-1 )64 9-5761 (3/12-2400 Baud). Galactic Conflict game also includcdl 
5I2kOS9 Level II and RS-232 <or COMM-4) pak required „ „ „ „ -.... S 29.95 

Presto - Partner 

This is what you have been waiting for! Finally RAM-Resident software for your COCO .1! Runs in the background while you do other work! Includes a note-pad that does 
automatic number calculations, a calendar with alarm, a phone book that can auto-dial your phone, a real-time clock and much, much, more! Thia program will organize your 
entire life! 512k OS9 Level II Required (Hayes compatible modem required for auto-dial) 5I2k OS9 Level II Required - $29.95 

Level II Tools 

Without the right tools OS9 is difficult... These ARE the right tools! With these great utilities anyone can use OS9 like a pro! Complete wildcard, tree and windowing commands 

make OS9 easy to use! If you want to start using OS9, this is what you need! If you already use OS9, these tools will save you hours of time and headaches! 

25 great utilities in one package S 2-1.95 

Disk Manager Tree 

This versatile utility makes your OS9 life a breeze! No more fighting with complex directory structures! No more searching for fdea and typing long path names! Everything is 
displayed using windows! Allows you to change, create, and delete directories with single keystrokes! Also oIIowb you to copy, view and delete files just as easily! A must for the 
OS9 beginner. A great time saver for the experienced OS9 user. Save hours of time and headaches! 512k OS9 Level II Required „ „ S 29.95 

Multi - Menu 

This great Multi-Vuc utility allows you to easily create your own pop-down menus! No programming experience is required, because no programming is dono! You will be able to 
run any OS9 command or program from a menu! Menu creation is super simple, super easy! Actually see the menu as it develops. A must for Multi-Vuo users! Make that non 
Multi-Vuc soaware run in Multi-Vue! 512k OS9 Level II and Multi- Vue required „ _ $ 19.95 

Warp -One 

Finally, a complete 0S9 Level II windowing terminal program. Many features include Auto-dial & macro, X & Y modem, ANSI graphics, buffer capture, on-line timer, chat mode, 
windows, and much, much, more! Perfect for any BBS user! More power that you'll ever need! 512k OS9 Level II & RS-232 Pak Required S 34.95 

The Zapper 

This wonderful utility allows you to patch anything! PaUh commands directly on disk and fix CRCs automatically! Patch the OS9 Boot file! Save lost files! Fix crashed disks! 
One use of thia program could be worth the price! 64k OS9 Level I or 11 required _...—.. _ , $ 19.95 

Send check or money order to: Alpha Software Technologies, 1500 M0 Service Rd. 161, Slidell, LA. 70461 <5(M)649j;i76 (vo.ee) 

<604)«B-576J (BUS) 

Please add S3. 00 Shipping and handling, all orders shipped same day via first class mail. Moat orders arrive in 2 to 3 days. COD orders ndd $2.50 extra. 
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makes it easy to edit records but clumsy to 
type them in the first time because any 
wrong character must be deleted before 
being retyped. The end of the record is cut 
off if more than 45 characters are forced 
into the record. 

Save file — Must be used after editing to 
save any changes made. It saves only that 
portion of the file loaded previously. 

Change month — Lets you select any 
month of the year to load in for editing. 

Comingevents — Provides an easy way 
to see the upcoming calendar for the next 
two weeks from the current date set when 
booting OS-9. It also looks back several 
weeks in your calendar to see if there were 
any reminders that yo.i still want called up 
(more on that later). 

Quit — Exits the program and returns 
you to the OS-9 command line. 

One special feature of the program is 
that when you load a file for a current 
month, it also loads the last two weeks from 
the previous month and the first two weeks 
from the upcoming month. This provides a 
total of 60 days that can be edited from one 
loading, which is especially nice since some 
events such as paying bills occur close to 
the same day each month. 

The reminder feature is also interesting. 
By inserting an asterisk (*) anywhere in the 
record for any day. you can call up a record 
in the reminders section when using the 
Coming Events selection. This happens 
only if the event occurs in the previous two 
weeks from the current day. For example, 
the option can be used when you want to be 
continually reminded to buy a birthday 
present for someone — procrastinators will 
love this. 

The caiendar_fiie is an empty file 
except for the first five bytes of each record 
that eontain the date in the format 01/01. 
The record is 50 bytes long with 45 bytes 
available for the user. 

The curr_cai program can be used in 
the startup file or as a stand-alone program 
to display the previous seven days for any 
reminders activated with an asterisk. It also 
looks ahead seven days. No editing can be 
done with this program. 

The createfiie_cai program creates 
the original empty caiendar_fiie in the 
current directory. This sets up all the month/ 
day records with 45 bytes of space reserved 
for the user. 

One extra benefit is that the menu por- 
tion can be used in other BASIC09 programs 
by following the same parameters I've used 
here. q 



PRINT "Press <ENTER>" 
REPEAT 

RUN gfx2("curxy '. C, Select ior.+First_Choie») 
RUN gfx2("revon") 
PRINT Selection-: 

RUN gfx2("curxy ,C-l.S«leet.ion+First_ohoic«) 
RUN gfx2("revoff ) 
GET 80, Que 
EXITIF Que-48>0 AND Que-48<=Total_opt ions THEN 

Selection :=Que~49 
ENDEXIff 

PRINT " "; Selection*!; 

IF Que=$0A THEN \REM down arrow 

Selection : =MOD (Selaction+1 , Tota l_out i ons) 
ENDIF 
IF Que=$0C THEN \REM up arrow 

Selection :=MOD(Selection-l, Total opticus) 
IF Selection<0 THEN 

Selection=Tc t al_opt i ons - 1 
ENDIF 
ENDIF 
UNTIL Que=$0D \REM enter key 
PRINT CHR$(12) 
SHELL "tmode echo" 
Select=Selection+l 
RUN gfx2 ("owend") 
END 

SHELL "tmode echo' 
RUN g£x2 ("owend") 
END 



01FE 
0210 
0212 
022C 
0239 
0242 
025E 
02 6C 
0275 
02 8F 
02 9 A 
02 9E 
02AB 
02C5 
02D4 
02D6 
02EE 
02FD 
0309 

0314 

0316 

0318 

0330 

0335 

0343 

034E 

03 5B 

035D 10 

03 6E 

037B 
\PROCEDURE iniz_cal 

0000 

0023 

0033 

0053 
i 005A 

006A 



" 



PARAM day_o£__year,first_day,mth, year: INTEGER; day (7r STRING 13*. 

DIM daycode (26) , yearcode : INTEGER 

DIM days_in_month (12), i: INTEGER; month (12) ;STKiNC(.9| 

DIM year real: REAL 

FOR i:=l TO 26 

READ daycode (i) 
NEXT i 
DATA 2, 3, 4, 5, 7, 1,2, 3, 5, 6, 7, 1,3, 4, £.,6. 1.2. 3. 4 

DATA 6,7,1,2,4,5 
FOR i:»l TO 12* 

READ days_in_month(i) 

READ month (i) V «J 

NEXT i 

DATA 31, "January ",28, "February", 3: March". 30, "April 
DATA 31, "May", 30, "June", 31, "July", 31. •August". 30. "Septemfcer" 
DATA 31, "October", 30, "November ",31 . ' December" 
FOR i:=l TO 7 ' 

READ day(i) 
NEXT i 

DATA "Sun","Mon", "Tue'V'Wed", "Thu". "Frl", "Sat" 
year : =1 900+year \yearcode : =year-1984 
day o f _y ear : =0 
FOR i:=l TO mth-1 

day_of_year:=day_of_year+days_i:i_ff.:>.'ith(i) 

NEXT i 

year_real ;=year 

IF INT(year_real/4)=year_real/4 THEM 

IF mth>2 THEN 

day_of_year : =day_o£_year+l 

ENDIF 
ENDIF 

first_day :=day_of_year+l-INT (day_o£_yodt /7) »7 
f ir st~day -• =f irst_day+daycode (yearcode) 
• IF first_day>7 THEN 

f irst_day : =f irst_day-7 
ENDIF 

PRINT CHR$(12) ; 
RUN print_cal (days_in_month (rath) , £ i rst day . year . mth, isonth (rath) 

END ... ■ 



0073 

007 E 

00BE 

00D4 

00E4 

00ED I 

00F6 

0101 

0136 

0172 

01 9F 

01AF 

01B8 

01C3 

01F1 

0209 

0210 

0224 

0233 

023E 

0247 

025D 

0269 

0274 

0276 

0278 

0291 

02A0 

02AC 

02B7 

02B9 

02BF 

02E8 
PROCEDURE get_date 

0000 PARAM hour, min, day, month, year :INTEGER 

0017 hour:~VAL(MID$(DATE$,10,2)) 

0024 min:=VAL(MID$(DATE$,13,2) ) 

0031 month :<=VAL (MID? (DATES, 4,2) ) 

003E day : =VAL (MID$ (DATES ,7,2)) 

004B year:=VAL(MID$(DATE?,l,2) ) 

0058 END 
PROCEDURE print_cal 

0000 PARAM days, first_day,y«ar,mth:INTEG£R 

0013 PARAM month :STRING[9* - day (7) : STRING (3) 

002F DIM y,i,dow: INTEGER 

003E dow : =f irst_day 

0046 SHELL "tmode -pause" 

0056 RUN gxx2("curo£f") 

0064 RUN gfx2 ("curxy", 7,1) 

0077 PRINT month; 

007D RUN gfx2("curxy", 42,1) 

0090 PRINT year 

0095 FOR i:=l TO 7 

00A5 RUN gfx2("curxy",i'6<*-,3) 

00BF PRINT day(i) 
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00C7 NEXT i 

00D2 y : =4 

08D9 FOR i:=l TO 'days 

00EA RON gfx2("curxy dow"6*l,y) 

0106 dow : =dow+l 

0111 IF dOW>7 THEN 

011D dow:=l 

0124 y:=y+2 

012F EKDIF 

0131 PRINT i 

0136 NEXT i 

0141 RUN gfx2("curon") 

014E SHELL "tmoda pause" 

015D END 
PROCEDURE loadfile_cal 

01300 PARAM day_of_yoar . INTEGER. record(60) : STS:NG[50) 

0017 DIM first_reoord. i, path: INTEGER 

0026 first_record:=day_oi_yeaE-15 

0031 IF £irst_record<0 THEN 

003D first record =first reccrd+365 

0049 ENDIF 

004B OPEN #path, "calendar file": READ 

0063 SEEK #path,50*first record 

0070 FOR i:=l TO 60 

0080 IF i+first_rocord=366 THEN 

0091 SEEK #patfc.0 
009A ENDIF 

009C GET #path, record <i ) 

00AA -, record (i) :=recordii)+" 

00EF NEXT i 

00FA CLOSE #path 

0100 END 
PROCEDURE savefile_cal 

0000 PARAM day_of_yoar: INTEGER 

0007 PARAM record(60) :STRING;50: 

0018 DIM £irst_record.l, path: INTEGER 

0027 first_record:=day_of year-15 

0032 IF first_record<0 - TakN 

003E first_record:=f irnt reoord+365 

004A ENDIF 

004C OPEN #path,"calendar_flle": WRITE 

0064 SEEK #path,50*£irBt record 

0071 FOR i:=l TO 60 

0081 IF i+£irst_record=366 THEN 

0092 SEEK #path,0 
009B ENDIF 

009D POT #path, record (i) 

00AB NEXT i 

00B6 CLOSE #path 

00BC END 
PROCEDURE editfile_cal 

0000 PARAM record(60) :STRING[50] 

0011 PARAM first_day,mth,year:INTEGeR: dayP) STRING! 3] 

0030 DIM que: STRING £1] 

003C DIM x, y , page : INTEGER 

004B RUN g£x2("owset", 1,0, 0,80,24. 0.1) 

006D RUN gfx2("curxy",0,22) 

0080 PRINT" fl . .delete line Ctrl f 3 .quit editing f 2 . delete character" 

00C7 PRINT " shift up. .pre v page shift down ..next page"; 

0108 SHELL "tmode -pause -echo" 

011E page:=0 \x:=9 \y:=l 

0133 RUN printfile_cal (record, page. {irj;t_day.mth, year, day) 

0156 RUN gfx2("curxy",x,y) 

01 6D LOOP 

016F GET #0,que 

0178 EXITIF que=CHR$( 181) THEN 

0185 ENDEXIT 

0189 IF que=CHR$(177) THEN 

0196 RUN delrec_cal (record (y»pago) .x.y) 

01B1 ENDIF, 

01B3 IF que=CHR$ (178) THEN 

01C0 RUN delchar cal (record (y+page! ,x.y) 

01DB ENDIF 

01DD , IF que=CHR$(26) THEN 

01EA RON uppage_cal (page) 

01F4 RUN printfile_cal (record, page, first day. mth. year, day) 

0217 ENDIF 

0219 IF que=CHR$(28) THEN 

0226 RUN downpage cal (page) 

0230 RUN printfile cal (record, page, fi tat day. mth, year , day) 

0253 ENDIF 

0255 IF que>=CHRS(8) AND que<=CHR? (13) THEN 

02 6A RUN movecur_cal (que , x , y ) 

027E ENDIF 

0280 IF ASC(que)>=32 AND ASC (que) <=128 THKN 

0295 RUN chgfile_cal (record (y+page) ,x,y.que) 

02BS x:=x+l 

02C0 ENDIF 

02C2 RUN gfx2("curxy",x, y) 

02D9 ENDLOOP 

02DD SHELL "traode pause echo" 

02F1 RUN gfx2("owend") 



e^?i!l 



1-800 



.2& 



3i& 



TANDY COMPUTERS 

Tandy 1000-HX 256K 5 1/4" 
Tandy 1 000-SL/2 51 2K 3 1 /2" 
Tandy 1000-TL/2 640K 3 1/2" 
Tandy 1 100FD Portable 
Tandy 1400FD Portable 
Tandy 1400HD Portable 
Tandy3000-NL512K3 1/2" 
Tandy 4020-LX 1 Meg 3 1/2" 
Tandy 4025 LX 2 Meg 3 1/2" 
Tandy 4000-SX 1 Meg 3 1/2" 
Tandy 5000MC 2 Meg 1 Drive 
Tandy 5000MC 2 Meg 84 Meg 
Tandy 1 02 24K 
Tandy Color 3 1 28K 
WP-2 Wordprocessor 
WP-100 Wordprocessor 

MONITORS & CARDS 

VM-5 Monochrome Green 
CM-5 Color RGB 
CM-11 Color RGB 
Magnavox 9CM053 Color EGA 
Packard Bell Monochrome TTL 
Amdek 410 Monochrome 
Paradise Basic EGA Card 
Video 7 Vega/Deluxe 

DISK DRIVES 

5 1/4" External Drive 1000HX 
Tandy 20 Meg Hard Card 
30 Meg Hardcard 
Weltec 5 1/4" for Tandy 1400 
Seagate 20 Meg Drive & Card 

MODEMS 

Prac. Peripherals 1200B Internal 
Prac. Peripherals 2400B Internal 

PRINTERS 

DMP-107 Dot-Matrix 
DMP-1 33 Dot-Matrix 

DMP-300 Dot-Matrix 
Epson LX-810 Dot-Matrix 
Epson FX-850 Dot-Matrix 
Epson LO-510 Dot-Matrix 
Epson LQ-850 Dot-Matrix 
Epson FX-1050 Dot-Matrix 
Panaonic KX-P1 180 Dot-Matrix 
Panasonic KX-P1 191 Dot-Matrix 
Panasonic KX-P1 124 Dot-Matrix 



349.00* 

CALL 

819.00* 

805.00 
1210.00 
1975.00 
1275.00 
2950.00 
3650.00 
1950.00 
3825.00 
5395.00 
345.00* 
115.00* 
249.00* 
425.00* 



115.00 
220.00 
315.00 
395.00 

89.00 
155.00 

99.00 
239.00 



180.00 
450.00 
395.00 
215.00 
269.00 



75.00 
175.00 



210.00 
240.00* 

479.00 
195.00 
365.00 
345.00 
585.00 
485.00 
195.00 
265.00 
329.00 



* These Items Are On Sale Thru 1 2/25/89 



All prices and oilers nuy oe changed or withdrawn wilhoul noi>eo Advor- 
hud pricoii a'- caah pricoi COD acceptor] add 2"W» (minimum cfiargo 
510 DO) K' C . Visa add 2*e All non dft'echvo dams rnqmru lolmn 
m<vc hands* 1 authori/aiion Call *or FIMA Nurnbur bolero reluming 
Dnivery a subjeci lo dioouci availability Add 1'^** tor shipping and 
handling. S5 00 minimum cnargo 

TM - Registered Trademark of Tandy, Epson, and IBM 

Monday Ihru Friday 9om - 5pm EST. 



□ DGQQ ■*■ 
DDDDD ■*■ 

"■§SESlJD[?l1]U[3[I]S 

124 South Main Street, Perry, Ml 48872 

CALL 1-517-625-4161 or TOLL-FREE 

1-800-248-3823 
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Submitting 

Material 
To Rainbow 



Contributions to toe rainbow are wel- 
come from everyone. We like 10 run a 
variety of programs that are useful, help- 
ful and fun for other CoCo owners. 

WHAT TO WRITE: We are inter- 
ested in what you want to tell our read- 
ers. We accept for consideration any- 
thing that is well-written and has a prac- 
tical application for the Tandy Color 
Computer. If it interests you. it will proba- 
bly interest lots of others. However, we 
vastly prefer articles with accompany- 
ing programs that can be entered and 
run. The more unique the idea, the more 
the appeal. We have a continuing need 
for short articles with short listings. These 
are especially appealing to our many 
beginners. 

FORMAT: Program submissions 
must be on tape or disk, and it is best to 
make several saves, at least one of them 
in ASCII format. We're sorry, but we do 
not have time to key in programs and 
debug our typing errors. All programs 
should be supported by some editorial 
commentary explaining how the pro- 
gram works. We also prefer that editorial 
copy be included in ASCII format on the 
tape or disk, using any of the word proc- 
essors currently available for the Color 
Computer. Also, please include a double- 
spaced printout of your editorial mate- 
rial and program listing. Do not send text 
in all capital letters: use upper- and 
lowercase. 

COMPENSATION: We do pay for 
submissions, based on a number of crite- 
ria. Those wishing remuneration should 
so slaw when making submissions. 

For the benefit of those wanting more 
detailed information on making submis- 
sions, please send a self-addressed, 
stamped envelope (SASE) to: Submis- 
sion Guidelines, the RAINBOW, The Fal- 
soft Building. P.O. Box 385. Prospect. 
KY 4005'). We will send you compre- 
hensive guidelines. 

Please do not submit material cur- 
rently submitted to another publication. 



02FE RON g£x2 <'curxy",0,22) 

0311 END 
PROCEDURE uppage_cal 

0000 PARAM p«:je: INTEGER 

0007 page:=pago+20 

0012 IF page>4S! THEN 

001E page: -40 

0025 ENDIF 

0027 END 
PROCEDURE downpage_cal 

0000 PARAM paqo. INTEGER 

0007 page:=page-20 

0012 IF pago--20 THEN 

001 F page 

0026 ENDIF 

0028 END 
PROCEDURE chgfile oal 

0000 PARAM record:STRINGlS0j : x, y INTEGER 

0016 PARAM que: STRING! 1] 

0022 record: -LEFTS (record, x-4) +q>ie-RIGHT$ (record, 50- (x-4: ) 

0043 IF x>53 THEN 

004F x:=53 

0056 ENDIF 

0058 RUN gfx2 ( "curxy' , 4,y) 

006D PRINT record 

0072 END 
PROCEDURE movecur_cal 

0000 PARAM qiie STR:NG[1J; x,y INTEGER 

0016 ON ASC (gee) -7 GOSUB 10. 20. 30, 40, 50. 60 
0039 RUN gf x? I nurxy .x.y) 

0050 END 

0052 10 x:=x-l 
0060 IF x<9 THEN 
006C x:=53 

0073 ENDIF 

0075 RETURN 
0077 20 x:=X+l 

0085 IF x>5 3 THEN 

0091 x:=9 

0098 ENDIF 

009A RETURN 

009C 30 y:=y+l 

00AA IF y>20 THEN 

00B6 y:=l 

00BD ENDIF 

00BF RETURN 

00C1 40 RETURN 

00C6 50 y:=y-l 

00D4 IF y<l THEN 

00E0 y : =20 

00E7 ENDIF 

00E9 RETURN 

00EB END 

00ED 60 x:=9 \y:=ytl 

0102 IF y>20 THEN 

010E y : =3 

0115 ENDIF 

0117 RETURN 
PROCEDURE printfil. -. 

0000 PARAM record (60) : STRING [50) : pago INTEGER 

0017 PARAM f.Lrst_day.. nth. year. INTEGER; day .'7) STH?NG( 3) 
0036 DIM day_of_week . i : INTEGER 

0041 DIM year_real:REAL 

0048 day_of_week : =f I rs* <!ay-l 

0053 year_real:=1900+year 

0060 IF INT(year_real/4)-y«ar_reol/4 THEN 

0076 IF mth>2 THF.N 

0082 day_of_week =day_o£_weok» I 

008D ENDIF 

008F ENDIF 

0091 IF day_of_week<l THEN 

009D day_of_week : 7 

00A4 ENDIF 

00A6 IF page=20 THEN 

00B2 day_of__week ; -day_of_wQQk - 1 

00BD IF day_of_weok<". THEN 

00C9 day_of_week <~doy_of _woek+7 

00D4 ENDIF 

00D6 ENDIF 

00D8 IF page=40 THEN 

00E4 day_of_week:=day_o£_weok i 

00EF IF day_of_weex<l "HEN 

00FB day of week : »day of week* 7 

0106 ENDIF 

010B ENDIF 

010A FOR i:=l TO 20 

011A RUN gfx2("cur>.y ,0. i) 

012F PRINT day (day_6£ week) . " "; 

013C PRINT record (npnije) 

0148 day_of_week =day of weoktl 

0153 IF day_o£_WB«.k>7~THEN 

01 5F day_of weok -1 
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1 OS -9 



W%m,Mf;zwk<??-- 



m r» 



■ Menu oriented 

■ Upload/download Ascil 
or XMODEM protocol 

' Execute OS-9 commands 
from Within XTERM 



XTERM 

OS-9 Communications program 



Delinablc macro keys 
Works with standard serial port, KS232 
Pak, or Pit.) 2SP Pack, Includes all drivers 
Works with standard screen, Xscrccn 
WORDPAK or DISTO 80 column board 



$49.95 with source $89.95 



f : ' .'-■ 



ECONOMIST 

Perform economic analysis to compare differ- 
ent cost and income alternatives! Compute 
present and future Life Cycle Worths for var- 
ious combinations of single, series and gradi- 
ent dollar amounts. Quickly edit and recom- 
pute for sensitivity analysis! Display line 
graphs. Printout data and results. Pull-down 
menus, windows and prompts. Requires os-9 
level II and Basic09. 

$39.95 WITH SOURCE $79.95 



HARDWARE 



512k memory upgrade 

Ram Software 
Ram Disk 
Print Spooler 
Quick Backup 



$99.95 



All three for only 
$19.95 



Software by CclarVenlure 



XWORD 
OS-9 word processing system 

- Works with standard text screen, XSCREEN, WORDPAK, or DISTO 

■ True character oriented Full screen editing 

• Full block commands 

■ Find and Replace commands 

• Proportional spacing supported 

> Full printer control, character size, emphasized, italics, overstrike, 
underline, supcr/suh-scripts 

• 10 header/rooters 

• Margins and headers can be set different for even and odd pages 

$69.95 wilh source $124.95 
XMtHCaE Mall mei-Ro capabilities for XWORD 

$24.95 with source $49.9 5 

AOrbLL OS-9 spelling checker, wilh 40000 word dicllunarlcs 

$39.95 
XTRIO XWORD/XMERGE/XSPELL 

$114.95 with source $199.95 

XED OS-9 full screen editor 

$39.95 with source $79.9 5 
XDIS OS-9 disassembler 

$34.95 with source $54.95 
XDIR & XCAL Hlerarchial directory, OS-9 calculator 

$24.95 with source $49.9 5 
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THE DIRECTOR 

Produces hires picture sound and color animation shows. Completely menu 
driven wilh full editing. Great for prcscnlalions and vcr's. Requires COCO III 
only. $39.95 
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awiA-LL BUSINESS ACCOUTING 

This sales-based accounting package is de- 
signed Tor the non-accountant oriented busi- 
nessman. It also contains the flexibility for 
the accounting or fen led user to set up a double 
entry journal with an almost unlimited chart 
of accounts. Includes Sales Entry, transaction 
driven Accounts Receivable and Accounts Pay- 
able, Journal Entry, Payroll Disbursement, 
and Record Maintenance programs. System 
outputs include Balance Sheet, Income State- 
ment, Customer and Vender status Reports, 
Accounts Receivable and Payable Aging Re- 
ports, Check Register, Sales Reports, Account 
Status Lists, and a Journal Posting List. 

$79.95 

INVENTORY CONTROL/SALES ANALYSIS 

This module is designed to handle inventory 
control, wilh user defined product codes, and 
produce a detailed analysis or the business' 
sales and the sales force. One may enter/update 
inventory data, enter sales, run Hvc sales anal- 
ysis reports, run five Inventory reports, set up 
product codes, enter/update salesman records, 
and update the SBAP inventory. 

$59.95 



PAYROLL 

Designed for maintaining personnel and 
payroll data Tor up to 200 hourly and salar- 
ied employees with 8 deductions each. Cal- 
culates payroll and lax amounts, prints 
checks and maintains year-to-datc totals 
which can be automatically transferred to 
the SBA package. Computes each pay peri- 
od's totals Tor straight time, overtime and 
bonus pay and determines taxes to be with- 
held. Aditional outputs include mailing list, 
listing of employees, year-to-datc federal 
and/or state lax listing, and a listing of cur- 
rent misc. deductions. Suited for use in all 
states except Oklahoma and Delaware 

$59.95 



PERSONAL BOOKKEEPING 2000 
Handles 45 accounts. Enters cash expenses as 
easily as checks. Handles 26 expense catego- 
rlesK. Menu driven and user friendly. 

$39.95 



ACCOUNTS RECEIVABLE 

Includes detailed audit trails and history 
reports for each customer, perparcs in- 
voices and monthly statements, mailing la- 
bels, aging lists, and an alphabetized cus- 
tomer listing. The user can define net 
terms Tor commercial accounts or finance 
charges for revolving accounts. This pack- 
age functions as a standalone A/K system or 
integrates with the Small Business Accting 
package. 

$59.95 

ACCOUNTS PAYABLE 

Designed for the maintenance of vendor 
and A/P Invoice files. The system prints 
checks, voids checks, cancels checks, de- 
letes cancelled checks, and deletes paid A/P 
Invoices. The user can run a Vendor List, 
Vendor Status report, Vendor Aged report, 
and an A/P Check Register. This package 
can be used either as a standalone A/P sys- 
tem or can be integrated with the Small 
Business Accounting Package. 

$59.95 
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19(16 .Irrrold 
St. Paul, MN 

Inquiries Invited 
Submissions accepted 



A V critic : 
55112 



Deal 
Anlh 
OS-9 is a trademark of Micropore 




Ordering Information 

Add S3.00 shipping & handling, MN residents add d% sales tax. 
Visa. Mastercard, COD (add S3.50), personal checks. 



(612) 633-6161 



About 

Your 

Subscription 



Your copy of the rainbow is sent 
second class mail. You must noiify us of 
a new address when you move. Notifica- 
tion should reach us no later than the 15th 
of the month prior to the month in which 
you change your address. Sorry, we can- 
not be responsible for sending another 
copy when you fail to notify us. 

Your mailing label also shows an ac- 
count number and the subscription expi- 
ration dale. Please indicate this account 
number when renewing or correspond- 
ing with us. It will help us help you better 
and faster. 

ForCanadian and other non-U. S. sub- 
scribers, there may be a mailing address 
shown that is different from our editorial 
office address. Send your correspondence 
to our editorial offices at Falsoft. Inc.. 
The Falsoft Building, P.O. Box 385. Pros- 
pect, KY 40059. 
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0166 

0168 

0173 
PROCEDURE 

0000 

0016 

0036 

004 B 

0057 

00SC 
PROCEDURE 



0016 

0053 

0068 

006D 
PROCEDURE 

0000 

0023 

002F 

0055 

0076 

0082 

00A0 
PROCEDURE 

0000 

0011 

0038 

004 E 

0059 

0060 

0082 

0091 

0099 

00A8 

00B4 

00C6 

00D3 

00E9 

00F5 

0100 

0102 

0104 

0110 

01 IB 
011D 
013E 
0156 
0169 
017B 
0188 
01BA 
0195 
01A1 
01A8 
01AA 
01B5 
01DE 
01FA 
020C 
0219 
0224 
0230 
0237 
0239 
0244 
0252 
0274 
027D 

02 8 A 
0297 
02 9D 
02 9F 

1-ROCEDURE 
0000 
0012 
001E 
0044 
004 D 
0052 
005F 
0066 
0076 
0081 
0091 
00A9 
00B5 
00B7 
00B9 
00BB 
00BD 



ENDIF 
NEXT i 
END 
delchar_cal 
PARAM record :STRINC[ 50) ; x,y:INTE3ER 
record:=LEFT$(re^o.'d, x-4> +RIGHT9 (record, 50- (x-4+1) ) 
RUN gfx2 ("curxy ', 4,y) 
record :=record4 
PRINT record 
END 
delrec_cal 
PARAM record:STRINC.[S0]. x,y:INTKGER 
record:=LEFTS (record, S) f 
RUN gfx2 ("curxy ', 4,y) 
PRINT record 
END 
chgmonth_cal 
PARAM day_jif_year, f trst_day. mth, year ; INTEGER; day (7) : STRING! i] 
DIM que: STRING [1] 

PRIST CHRS112) 0034 PRINT "Currant month is set at ". mth 

INPUT " Changs to. ^,rath 

year :=year-l 900 

RUN iniz_cal (day of^yeax, f. irtt day, mth, year. day) 
END 
event_cal 
PARAM record ( 60) : STRING: 501 

PARAM first_day,day_of_yoar, date. mth. year : INTEGER; day (7) : STRING! 3) 
DIM que,que_temp:STRING;ij ; path;BYTE 
DIM day_o£_week, i : INTEGER 
DIM year_real : REAL 
RUN gfx2("owset", 1,0,0, H0.24.0, 1) 
RUN io_cal (que, path) 
que__temp : =que 

RUN loadf iie_cal (day_of _ynar . record) 
first_record:=date+l 
day_of_week : =MOD (date+f irst_day~l, 7) 
yea r_real : =1 900+year 
IF INT(year real/4)=yaar_re<il. 4 THEN 

IF mth>2 THEN 

day_o£_week : ; =day_o£_wnok + I 

ENDIF 
ENDIF 
'IF day_o£_week<l THEN 

day of week:=day of week+7 
ENDIF 

PRINT #path, "Overdue rer-.lnders: ' 
FOR i : =f ir st_record TO first record* 13 

IF SUBSTR ("*", record (i ;; <>0 THEN 
PRINT #path, day (day _o« week); 
PRINT #path, record ( i ) 

ENDIF 

day_of_week:«day_of w-«k + l 

IF day_of_week>7 THEN 
day_of_week : »1 

ENDIF 
NEXT i 

PRINT ttpath, \ PRINT Hp.ith, 'Upcoming Calendar:" \ PRINT ffpath, 
FOR i:=£irst_record+14 TO first record+27 

PRINT Hpath, day (day_of «.»■,-) 

PRINT #path, record (i) 

day_of_week : =day_of_w**f** - 1 

IF day_of_week>7 THEN 
day__of_week : =1 

ENDIF 
NEXT i 

PRINT #path, \ PRINT ttpath, 
PRINT #1, "Press any key to continue". 
GET #0, que 
RUN gfx2("ow»nd") 
IF que_teinp<> '«" THEN 

CLOSE Spath 
ENDIF 
END 
io__cal 
PARAM que : STRING! I) ; path BYTE 
DIM pathname:STRING[291 

PRINT \ PRINT "<S>creen, <P>iir.ter. or <F>ile? " 
GET S0,que 
PRINT CHRS(12) 
IF que="S" THEN 

path:=l 
ELSE IF que="p" THEN 
OPEN #path, "/p" 

ELSE IF que="f" THEN 

INPUT "Enter pathname: ".pathname 
CREATE #path,pathnarr.e:MRITZ 
ENDIF 

KHDIF 
END XT 
END 



\ PRINT flpath 
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Listing 2: 


curr_cal 




PROCEDURE 


curr cal 




2000 


(* Curr_cal (c) Oct. 31,1989 




B01C 


(* Jonathan Saks a 




002D 


(* Rt. 1 Box 86 




003C 


(« Annandala, Mn. 55302 




0053 


(* These procedures are designed to be used 




007E 


(* in the startup file after the current 




00A6 


{* date has been set 




00BA 


(* Make sure you select the current directory that 




00EC 


(* holds the calendar_file 




0106 


(* Example: 




0111 


(* Setime </term 




0121 


(* chd /dd/my_calendar_directory 




0141 


(* Curr_cal 




014C 


(* These 5 files must be packed into your CMDS directory 




0184 


(* as Curr_cal 




0192 


DIM doy,first_day: INTEGER; record (60) : STRING!. 50] 




01AD 


DIM i, hour, min, date, mth, year: INTEGER 




01C8 


DIM day ( 7 ) : STRING [ 3 ) ; directory : STRING [ 2 9 ] 




01E4 


DIM xpos,t_opts, select :BVTE; choices (6) , title: STRING [20] 




0207 


DIM ypos.f col, bcol: BYTE 




0216 


RUN get_date (hour, min, date, mth, year) 




0234 


doy := ! 




02 3B 


RON iniz_cal (doy, f irst_day, mth, year, day) 




0259 


RUN event__cal (record, first_day, doy, date, mth, year, day) 




0281 


END 




PROCEDURE 


iniz cal 




0000 


PARAM doy, first day, mth, year : INTEGER; day (7) : STRING [3] 




0023 


DIM daycode(26) , yearcode : INTEGER 




0033 


DIM dinm(12) ,i:INTEGER; month(12) : STRING[9) 




0053 


DIM year_real : REAL 




005A 


FOR i:=l TO 26 




00 6A 


READ daycode(i) 




0073 


NEXT i 




007E 


DATA 2,3, 4,5,7,1,2,3,5, 6, 7,1,3,4,5, 6,1,2,3,4 




00BE 


DATA 6,7,1,2,4,5 




00D4 


FOR i:=l TO 12 




00E4 


READ dinm(i) 




00ED 


READ month (i) 




00F6 


NEXT i 




0101 


DATA 31 , "January" , 28 , "February" , 31 , "March" , 30, "April" 




0136 


DATA 31, "May", 30, "June", 31 , "July" , 31, "Augu3t",30, "September" 




0172 


DATA 31 , "October" , 30, "November" , 31 , "December" 




01 9F 


FOR i:=l TO 7 




01AF 


READ day(i) 




01BS 


NEXT i 




01C3 


DATA "Sun" , "Mon" , "Tue" , "Wed" , "Thu" , "Fri" , "Sat" 




01F1 


year : =1 900+year \yearcode : *=year-l 984 




0209 


doy :=0 




0210 


FOR i:=l TO mth-1 




0224 


doy :=doy+dinm(i) 




0233 


NEXT i 




023E 


year raal:=year 




0247 


IF INT(year_real/4)=year_real/4 THEN 




025D 


IF mth>2 THEN 




0269 


doy:=doy+l 




0274 


ENDIF 




0276 


ENDIF 




0278 


first_day :=doy+l-INT(doy/7) *7 




0291 


first day :=first_day+daycode (yearcode) 




02A0 


IF first_day>7 THEN 




02AC 


first_day:=first_day-7 




02B7 


ENDIF 




02B9 


END 




PROCEDURE 


get date 




0000 


PARAM hour , min, day , month , y ear : INTEGER 




0017 


hour : =VAL (MIDS (DATE$ , 10, 2 ) ) 




0024 


min:=VAL (MID$ (DATE$, 13,2) ) 




0031 


month :=VAL(MID$ (DATES, 4, 2) ) 




003E 


day : =VAL (MID$ (DATES, 7,2)) 




004B 


year : =VAL (MIDS (DATES ,1,2)) 




0058 


END 




PROCEDURE 


loadfile_cal 




0000 


PARAM doy:INTEGER; record (60) : STRING 1 50) 




0017 


DIM first_record,i, path: INTEGER 




0026 


first record :=doy-15 




0031 


IF first_record<0 THEN 




003D 


first_record:=first_record+365 




0049 


ENDIF 




004 B 


OPEN #path, "calendar file": READ 




0063 


SEEK #path,50»first record 




0070 


FOR i:=l TO 60 




0080 


IF i+first record=366 THEN 




0091 


SEEK #path,0 




009A 


ENDIF 





MORE BAUD** 
LESS BUCKS 



Save Time and Money with a Surprisingly 
Affordable 2400/1200/300 BPS Hayo« • 
Compatible Modem for any Computer. 

Don't be fooled by ihe low cost of these 2400 baud 
modems. These are high quality modems made in the 
USA, with performance features unmatched by 
competitors costing three times as much. 

This is full-featured Hayes compatible modem that 
works with any computer. It features suponor Hayes 
compatibility, advanced digital signal processing, and 
adaptive equalization for great performance and 
reliability. All of this in a compact, attractive go- 
anywhere package that's not not much larger than a 
paperback book. 

Convenience features like call progress tone detection, 
auto-dial and auto-answer, a call progress speaker with 
volume control, a second jack for a local phone, on 
board diagnostics. 

Money saving premiums for sign-up and connect time 
for Delphi, The Source. CompuScv. etc. SoltwarO 
available: ProcComm (PC) + 5; OuickLink (Mac) ■» 5; 
WizPro is free (shareware). 

Backed by two yoar mfg. warrantee, so you can buy 
with confidence thai comes with 11 years of 

telecommunication experience. 

2400/1200/300 BPS modem $125.00 

{Please add 2.50 shipping and handling) 
Dealer inquiries welcome. 

GCS FILE TRANSFER UTILITIES 



Soo: 



Review - December Rainbow. 
Dalo PuckoU - November Rainbow. 



The GCS File Tranaler Ulililies provide a simple 
and Quick method to transfer text and binary files Irom 
and to a variety ol floppy disk formats. 

Just place tha PC (MSDOS), RSDOS, FLEX or 
MINI-FLEX disk into your disk drive - enter a simple 
command and the lila is copied into a OS-9 lile. File 
transfer back is just as simple. Under Multi-Vue 
version, just select command from one of three menus. 
Commands Dir of PC. RS or FLEX disk 

Dump disk sector of PC. RS or FLEX 

Read file Irom PC. RS or FLEX disk 

Writ* file to PC. RS or FLEX disk 

Rename file on PC disk 

Delate file from PC disk 

Formal PC disk 
Extensive Single, Double sided disks. 

Options Single, double density disks. 

35, 40 or 80 track floppy drives. 

8 or 9 sectors (PC). 

Firsl level sub-directories (PC). 

Binary files. Use pipes for direct 

and multiple transfers. 
Require* OS-9. 2 drives (one can be hard or 

ramdisk - one floppy 40 T DO DS). 

Multi-Vuo for Multi-Vue version. 

SDISK (SDISK3 for COCO III). 

GCS File Transfer Utilities for C0C0 

Multi-Vue version $54.95 

Standard version $44.95 

SDISK or SDISK3 $29.95 

Siarrfard diskettes are OS-9 lormat (5.25") add $2.50 lor 3.5V 
Orders must be prepaid or COD. VISA/MC. Add $ 1.75 S»H. 
COD Is additional. 

GRANITE COMPUTER SYSTEMS 

Route 2 Box 445 Hllleboro, NH 03244 
(603) 464-3850 

OS-9 Is a trademark ol Mlcrowara Systems Corporation and 
Motorola Inc. MS-DOS Is a trademark ot Microsott Corp. 
FLEX is a trademark ot TSC, Inc. 
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The Rainbow Bookshelf 




m 



Fill out your CoCo library 
with these selections 



The Complete Rainbow Guide to OS-9 

Authors Dale Puckett and Peter Dibble show how to take 
advantage of OS-9's multitasking and multiuser features. An easy- 
to-read, step-by-step guide packed with hints, tips, tutorials and free 
software in the form of program listings. 
Book $19.95, Disk Package $31 (2 disks, book not included) 



The Rainbow Book of Simulations 

20 award-winning entries from THE RAINBOW'S first Simulations 
contest. You are a Civil War Commander, an air traffic controller, 
a civil defense coordinator, or a scientist on Mars . . . your wits are 
on the line. 
Book $9.95, Tape $9.95 



The Complete Rainbow Guide to OS-9 Level II 
Vol. I: A Beginners Guide to Windows 

Puckett and Dibble have done it again! They uncover the 
mysteries of the new windowing environment and demonstrate 
clever new applications. More hints, tips and plenty of program 
listings. Book $19.95, Disk $19.95 

The Rainbow Introductory Guide to Statistics 

Dr. Michael Plog and Dr. Norman Stenzel give a solid introduction 
to the realm of statistical processes and thinking fpr both the 
beginner and the professional. (80-column printer required.) 
Book $6.95, Tape or Disk $5.95, Package $11.95 

The First Rainbow Book of Adventures 

Contains 14 winning programs from our first Adventure contest. 
Includes Sir Randolph ol the Moors, Horror HoOse, One Room, Dr. 
Avaloe and more. Plus hints, tips on solving Adventures. 
Book $3.50, Tape $3.50 

The Second Rainbow Book of Adventures 

Featuring 24 of the most challenging Adventure games ever 
compiled. Meet the Beatles and battle the Blue Meanies, find a 
hidden fortune, or win the heart of a mysterious princess. Ring 
Quest, Secret Agent Man, Dark Castle, Curse of Karos and more! 
Book $13.95, Tape $13.95 

The Third Rainbow Book of Adventures 

The excitement continues with 19 new Adventures. Discover 
backstage intrigue at the London Theatre, attempt a daring space 
rescue, or defeat evil in the year 2091 as a genetic android. Evil 
Crypt, Spymaster, Time Machine, The Amulet, and that's only the 
beginning! Book $11.95, Tape $9.95, Two-Disk Set $14.95 

The Fourth Rainbow Book of Adventures 

Fourteen fascinating new Adventures from the winners of our 
fourth Adventure competition. Rely on your wits to escape a hostile 
military installation, try to stop the Nazi plan to invade Great Britain, 
manage to reinstate our defense system before the enemy launches 
a massive missile attack, and more! 
Book $10.95, Tape $9.95, Two-Disk Set $14.95 



The Second Rainbow Book of Simulations 

The 16 winners from our second Simulations contest. Fly through 
dense African jungle, bull your way down Wall Street, lead a bomb 
squad, or try your hand at Olympic events. Test your skills and 
talents. Book $9.95, Tape $9.95. Disk $10.95 



I 

/ want to start my own Rainbow Bookshelf! 

Name 

Address 

Cit 



ZIP 



ity 

State 

□ Payment Enclosed, or D Charge to: 

□ VISA □ MasterCard □ American Express 
Account Number 

Card Expiration Date 



S 9.95 . 
S 9.95 . 
S 9.95 . 
S 9.95 . 
$10.95. 
$19.95 . 
$31.00. 

$19.95. 
S 7.95 . 
$ 7.95 . 
$13.95 . 
$13.95 . 
$11.95. 



Signature 

Please send me: 

D The Rainbow Book ol Simulations 

C Rainbow Simulations Tape 

G The Second Rainbow Book ol Simulations 

□ Second Rainbow Simulations Tape 
C Second Rainbow Simulations Disk 
C The Complete Rainbow Guide to OS-9 (book only) 
C Rainbow Guide to OS-9 Disk Package (2 disks) 
The Windows & Applications Disk for 

The Complete Rainbow Guide to OS-9 Level II, Vol. I 
D The Rainbow Book ol Adventures (lirst) 

□ Rainbow Adventures Tape (first) 
C The Second Rainbow Book ol Adventures 
D Second Rainbow Adventures Tape 
D The Third Rainbow Book ol Adventures 
D Third Adventures Tape 
D Third Adventures Disk Set (2 disks) 
D The Fourth Rainbow Book of Adventures 
D Fourth Adventures Tape 
D Fourth Adventures Disk Set (2 disks) 

□ Introductory Guide to Statistics 
D Guide to Statistics Tape or Disk (indicate choice) 
D Guide to Statistics Package (indicate choice ol tape or disk) 

'Add $2 per book Shipping and Handling in U.S. 

'Outside U.S., add $4 per book 

' Kentucky residents add 5% sales tax 

(Allow 6 to 8 weeks lor delivery) Total 

Mail to: Rainbow Bookshelf, The Falsoft Building, P.O. Box 385, 
Prospect, KY 40059 

To order by phone (credit card orders only) call (800) 847- 
0309, 8 a.m. to 5 p.m. EST. For other inquiries call (502) 
228-4492. 

Please note: The tapes and disks offered by The Rainbow Bookshelf are not siand-alone products. 
Thai is, Ihey are Intended to be an adjunct and complement to the books. Even if you buy the tape 
or disk, you will still need the appropriate book. OS-9*' is a registered trademark of the Microware 
Systems Corporation. 



).95. 
S14.95 . 
$10.95 . 
S 9.95 . 
$14.95. 
$ 6.95 . 
$ 5.95. 
$11.95. 



009C 


GET #path.record(i) 






00AA 


recordti ):-record(1)+" 


:...?* 




08EF 


NEXT i 






00FA 


CLOSE #path 






0100 


END 






PROCEDURE 


event cal 






0000 


PARAM record(60):STRING[50] 






0011 


PARAM first day, doy, date. mth. year: INTEGER: day(7):STRING[3 


%''J:?h '■■■". 




0038 


DIM que, que temp:STRING[l] : path:BYT£ 






004E 


DIM dow.i: INTEGER 






0059 


DIM year^real :REAL 






0060 


RUN loadfile.cal (doy , record); 






006F 


first_record:=date+l 






0B7B 


dow:-MOD(date+first_day-1.7) 






008D 


year real :-1900+year 






009A 


IF INTCyear real /4)-year_real /4 THEN 






00B0 


IF mth>2 THEN 






00BC 


dow.-dow+l 






00C7 


ENDIF 






00C9 


ENDIF 






00CB 


IF dow<l THEN 






00D7 


dow:-dow+7 






mil 


ENDIF 






00E4 


PRINT "Overdue reminders:" \ PRINT 






00FC 


FOR it-first record TO first_record+13 






0114 


IF SUBSTR("*",record(i))<>0 THEN 






0127 


PRINT day(dow): " "; 






0134 


PRINT record(i) 






013C 


ENOIF 






013E 


dow:-dow+l 






0149 


IF dow>7 THEN 






0155 


dow:-l 






015C 


ENOIF 






015E 


NEXT i 






0169 


PRINT \ PRINT "Upcoming Calendar:" \ PRINT 






0183 


FOR i:-first record+14 TO f1rst_^record+2l 






019F 


PRINT day(dow); " "; 






01AC 


PRINT record(i ) 






01B4 


dow:-dow+l 






01BF 


IF dOW>7 THEN 






01C8 


dow:-l 






01D2 


ENOIF 






01 D4 


NEXT i 






01DF 


END 







Listing 3: createf i ie_cal 



PROCEDURE 
0000 
0023 
0034 
0043 
005A 
0086 
00AA 
00CB 
00D7 
00F7 
0103 
010F 
011F 
0128 
0133 
0139 5 

: 0154 

0164 

- 0.17C 
0190 
01A8 
01ED 
0205 
020F 
021A 
0225 
022B 
022 D 
0255 10 
0262 
028E 
02A3 
02B8 
02BC 
02BE 
02C0 



createf1le_cal 
(* Createf i I e_cal 
Jonathan Saksa 
Rt. 1 Box 86 
Annandale. Mn. 



(c) Oct. 31, 1989 



55302 
This procedure only needs to be used once 
To produce an empty calendar.^ i le 
in your current data directory 
DIM daysJn_month< 12): INTEGER 
DIM path:BYT£; i. j: INTEGER; month,day:STRING[3] 
DIM record :STRING[50] 
OIM que:STRING[l] 
FOR i:-l TO 12 

READ days in month(i) 
NEXT 1 

ON ERROR GOTO 10 

CREATE #path . "cal enda r_f i 1 e" : WRITE 
FOR i:-l TO 12 
month:-" "+STR$(i) \month:-RIGHT$(month,2) 
FOR j:-l TO days in month(i) 

day:-" "+STR$(j) \day :-RIGHT$Cday .2) 
record :-month+"/"+day+" 

day:-"0"+STR$(j) \day:-RIGHT$(day ,2) 
PUT #path, record 
NEXT j 
NEXT 1 
CLOSE #path 
END 

DATA 31.28,31.30.31.30.31.31.30.31.30.31 
IF ERR-218 THEN 

INPUT "Erase current calendar^ lie (y/n) . . .".que 
IF que-"y" OR que-"Y" THEN 
SHELL "del cal enda r_file" 
GOTO 5 
ENDIF 
ENDIF 
END 



&S 




"•Hi-Res Graphics Utility" (No- 
vember 1989, Page 41): Some of 
The characters were inadvertently 
deleted from the end of three of the 
lines. In Line 170 add 140, in Line 
180 add 1B7, and inline 190 add 
ABB. ...... 



"Diarj " (June 1989, Page 91 !: To 

be able to load the diary once it is 
saved, change. Line 55 to read: 



"Letter Carrier" (October 1989, 
Page 20): The author has recently 
moved. His new address is 118 
Corlies Ave., Poughkecpsic, NY 
12601. 

"•'Doriut Dilemma Review" (No- 
vember 1989, Page 102): Because 
of a production error, the reviewer, 
Linda Manning, was not properly 
credited as having reviewed the 
product. We apologize for this over- 

-•sisht. '-"'A 
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Breakpoint 



Lost and Found 



by Greg Law 

Technical Editor 



Have you ever spent one of those 
dreary days looking for a par- 
ticular disk that you just 
couldn't find? If you are any- 
thing like me. you tend to have 
hundreds of mostly unlabeled disks scat- 
tered about that contain remnants of zillions 
of pieces of data. To say the least, trying to 
find anything is like trying to find the pro- 
verbial needle in a haystack. This month 
has been particularly interesting since I 
have just moved and everything is still 
lying around in boxes. With that in mind. I 
thought this would be the perfect lime to get 
organized. 1 started out with box after box 
of unknown disks and a handful of freshly 
formatted disks. I painstakingly copied each 
of the files to empty disks organized in such 
a way so that similar files are on the same 
disk. Then I attached disk labels to each. 
After a few days of moving files around. I 
finally had everything organized properly 
so that I could more easily find the files I 
needed. I quickly realized that disk labels 
tend to stick to everything with the excep- 
tion of the disks they are intended for. 

I then came across the perfect solution: 
vol . written by Joseph Cheek. This handy 
little utility allows you to view or change 
the volume name on any disk, even a hard 
drive. It is also very easy to use. Just load the 
source code into BASIC09 and execute the 
pack command to create the executable 
program. From then on. type vol and the 
program will guide you through by issuing 
several prompts. 

The program is broken down into three 
procedures: vol, Itou and printdate. The 



In addition to being OS-9 Online SIGop, 
Greg Law enjoys programming on all types 
of computers and has worked on systems 
ranging from the CoCo to the Burroughs 
B6700 super mainframe. He lives in Louis- 
ville. Kentucky. 



first procedure, vol , begins by declaring 
the variables and two structures used. The 
i d structure contains the date and time the 
disk was formatted along with the volume 
name of the disk. The r structure contains 
the 6809 microprocessor registers that are 
used to perform OS-9 system calls. The 
procedure obtains your user ID and the 
process ID with the statement RUN 
syscalKccode.r), using a calling code of 
-12 (F$ ID), and stores the user ID into the 
ui d variable. It then prints a short introduc- 



tion followed by your user ID. If your user 
ID is zero, it also prints (Superuser) in 
reverse video. 

The REPEAT loop at Offset 0189 first 
prompts you for the drive name. If you 
press ENTER, it will useeither/DDorthe last 
drive name you selected. This makes it easy 
to change the volume label on several disks 
since you don't have to type in the drive 
name every time. At Offset 01FC it opens 
the drive in Update mode and seeks to Byte 
1 1 of LSN 0. which contains the user ID of 



OS-9 



* 



The listing: vol 



PROCEDURE vol 



0000 
000C 
0030 
0039 
005E 
0067 
0077 
0083 
009? 
009D 
00A4 
00AB 
00BA 
00C5 
00D0 
00DE 
00E5 
00EF 
00F5 
0118 
013B 
013D 
0152 
0182 
0184 
0189 
018B 
0191 
0193 
01AC 
01B1 
01C4 
01E2 
01E6 
01EE 
01F0 
01FC 
0208 
0211 



DIM d1skname:STRlNG[32] 

TYPE rec-year.mon.day . hour. mi n. name (32) :BYTE 

DIM 1d:rec 

TYPE regs-CC.a.b,dp:BYTE: x.y.u: INTEGER 

DIM r:regs 

DIM drive, old:5TRING[4] 

DIM key:STRING[l] 

DIM char.uid,did:INTEGER 

DIM disk.ccode:BYTE 

DIM vol:B00LEAN 

ccode-12 

RUN syscalKccode.r) 

u1d-r.y 

r.a-1 

r.x-ADDR(diskname) 

ccode-139 

old-"/dd" 

PRINT CHR$(12): 

"VOL 0S9 disk volume name editor" 
"Written by Joseph Cheek for CSS" 



PRINT 
PRINT 
PRINT 
PRINT 



"Your UID is ": uid; 
IF uid-0 THEN PRINT " "j CHR$(31): 
ENDIF 
PRINT "." 
REPEAT 
VOl-TRUE 
PRINT 

PRINT "Drive name [": old: "]": 
INPUT drive 
IF drive-"" 

PRINT " ": CHRSO): old 

ELSE 

ol d-drive 
ENDIF 

dr1ve-dr1ve+"@" 
OPEN #d1sk.dr1ve:UPDATE 
SEEK tfdisk.ll 
GET fldisk.did 



(Superuser)"; CHRK31): "I": CHR$(7): 



THEN drive-old 
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the person who formatted the disk, and 
reads it into the did variable. Next it seeks 
to Byte 26, reads the date and lime the disk 
was formatted and the volume name into 
the 1 d structure, and closes the disk. The 
volume name has a maximum length of 32 
characters, and the last character has the 
most significant bit set. That is, if the 
volume name of the disk is "Utilities," then 
the volume name contains the values shown 
in Figure 1 . 

The REPEAT loop at Offset 0242 copies 
the volume name from id. name into 
diskname, stopping at either the character 
with the most significant bit set or at the 
32nd character in the string. It also clears 
the most significant bit so that when it is 
printed on the screen, the last character will 
be printed as a printable character instead 
of some Greek value as shown above in the 
dump of the volume name. 

The IF statement at Offset 027F com- 
pares the disk" ID with your user ID. If they 
are not the same and you are the superuser. 



0123456789ABC0EF 0123456789ABCDEF 

0000 55 74 69 6C 69 74 69 65 C3 00 00 00 00 00 00 00 Uti 1 i tie 

0010 00 00 00 00 00 00 00 00 00 00 00 00. 00 00 00 00 



Figure 1 



you are asked if you want to change the 
volume name anyway. If the disk ID is not 
the same as your user ID and you are not the 
superuser, you are not allowed to change 
the volume name; vol is set to FALSE. 

According to the BASICO') manual, you 
can print a quotation mark by placing two 
quotation marks within the string to be 
printed. This is what has been done in the 
PRINT statement at Offset 02FD. The end 
result is that it prints the volume name of 
the disk contained in quotation marks. For 
example, if your volume name is Utilities,, 
Volume: "Utilities" is printed on the 
screen, followed by the date and time the 



disk was formatted. If vol is TRUE, you are 
asked if you want to change the volume 
name. If you do. the cursor is moved up 
one line, that line is erased, and you are 
prompted for the new volume name. 

The REPEAT loop at Offset 03 A 1 reads 
the volume name you type in by executing 
the syscall module to perform the 
I$ReadLn system call. It was designed so 
that if you press ENTER without typing a 
volume name, it performs the loop again 
until you type in a volume name. It should 
copy the last character you typed in 
di skname to key and set the most signifi- 
cant bit. It should then strip off that char- 




We'Ve Just Converted Over 250 Macintosh Quality Pictures For The Color Computer. 
Each Set Includes An Excellent Graphics Editor! 



Set#1 

Clipart 

Space Pictures 

Animals 

More 



Set #2 

Celebrities 
Cartoon Characters 
Great Graphics 
More 



Set #3 

Adult Only 
R-Rated 
Beautiful Women 



Each Set Of 10 Disks 
Only $35.00 ! 

Buy 2, Get One Free! 
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32K Minimum 

Disk Only 
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acter from diskname and append ihe same 
character with the most significant bit set in 

key to diskname. 

However, there is one minor problem 
With this approach. The I$ReadLn system 
call reads each keystroke as you type il and 
terminates the siring with a carriage return 
when you press ENTER. The statement at 
Offset 03E9 copies the last character in the 
string into key. which should be thecharac- 
ter immediately preceding the carriage re- 
turn. Unfortunately this is not the case 
because BASictw expects the string to be 
terminated with $FF (Decimal 255). It 
actually searches all of memory until it 
finds SFF and then returns the character 
immediately preceding it. The author was 
attempting to get around a minor problem 
with BASIC09 where it writes the string, 
including the string terminator, to the disk. 
Although this is true, it writes only the 
maximum length of the string as it is di- 
mensioned — 32 characters — so no harm 
is done. 

As currently written, the program writes 
the volume name you typed in. However, 
the 32nd character has the most significant 
bit set. though it is not necessarily the last 
character you typed in. While this is harm- 
less, it does write some very interesting 
volume names on the disks. I suggest re- 
placing the line at Offset 03CE with INPUT 
diskname. The volume names written to 
disk are properly terminated when this is 
done. 

Once the volume name Ls written, the 
disk is closed. You are asked if you want to 
view or change the volume name on an- 
other disk. The entire loop is repeated if 
you press Y. and the program ends if you 
press any other key. 

The 1 tou procedure is used throughout 
the program to convert your yes or no 
responses into uppercase. It works by re- 
ceiving the string to be converted into the 
parameter named answer. The FOR state- 
ment loops through each of the characters 
in answer, placing the ASCII value of each 
of Ihe characters into char. If it is a lower- 
case character, it is converted to uppercase 
and appended to the end of workstring. If 
it is not a lowercase character, it is ap- 
pended to the end of workstring without 
any conversion. Finally, the converted string 
is copied from workstring into answer, 
which is then returned to the procedure that 
called it. 

The printdate procedure is fairly 
straightforward. It receives the date and 
time the disk was formatted into the para- 
meters year, month, day, hour, and minute, 
li then prints the date and time so that each 
value has a leading zero if it is less than 10. 
This prints the date and time in a manner 
similarlo89/10/04 at 09:05. □ 



021B 


SEEK //disk. 26 




0224 


GET //disk. id 




022E 


CLOSE //disk 




0234 


char-0 




023B 


diskname-"" 




0242 


REPEAT 




0244 


char-char+1 




024F 


d1skname-diskname+CHR$(LAND( id. name (char) .127)) 




0265 


UNTIL char-32 OR id.name(char)>127 




027D 


PRINT 




027 F 


IF didOuid THEN PRINT "Not your disk." 




029D 


vol-FALSE 




02A3 


IF uid-0 THEN PRINT "Change anyway [y/N]? "; 




02C8 


GET W.key 




02D1 


RUN Itou(key) 




02DB 


IF key-"Y" THEN 




02E8 


vol-TRUE 




02EE 


ENDIF 




02F0 


ENDIF 




02F2 


ENDIF 




02F4 


IF vol THEN 




02FD 


PRINT "Volume: : diskname: 




0312 


PRINT "Created on ": 




0322 


RUN print date (id. year. id. man. id. day . id.hour.id.min) 




034 F 


IF did-uid THEN 




035C 


PRINT "Change volume name [y/N]? ": 




037B 


GET #0.key 




0384 


PRINT 




0386 


RUN ltou(key) 




0390 


ENDIF 




0392 


IF key-"Y" THEN 




039F 


PRINT 




03A1 


REPEAT 




03A3 


PRINT CHR$(9): CHR$(3>: 




03AD 


PRINT "New volume name: "; 




03C3 


r.y-32 




03CE 


RUN syscall (ccode.r) 




03OD 


UNTIL LEN(diskname)>0 




03E9 


key-RIGHT$(diskname.l) 




03F4 


key-CHR$(L0R(ASC(key).128)) 




0401 


di skname-LEFT$(diskname.LEN(diskname)-l)+key 




0415 


OPEN //disk.drive:WRITE 




0421 


SEEK //disk. 31 




042A 


PUT //disk. diskname 




0434 


CLOSE //disk 




043A 


ELSE 




043E 


vol-FALSE 




0444 


ENDIF 




0446 


ENDIF 




0448 


IF vol THEN 




0451 


PRINT "Done. . .another disk [y/N]? ": 




0471 


ELSE 




0475 


PRINT "Another disk [y/N]? ": 




048E 


ENDIF 




0490 


GET //B.key 




0499 


PRINT 




049B 


RUN 1 tou (key) 




04A5 


UNTIL key<>"Y" 




04B1 


END "Done." 




PROCEDURE 


ltou 




0000 


DIM workstring:STRING[40] 




000C 


DIM COunt:INTEGER 




0013 


DIM char:BYTE 




001A 


PARAM answer:STRING[40] 




0026 


workstring-"" 




002D 


FOR count-1 TO LEN(answer) 




003F 


char-ASC(MI0$( answer. count.!)) 




004 E 


IF char>96 AND char<123 THEN 




0061 


char-char-32 




006C 


ENDIF 




006E 


works tring-workstring+CHRKchar) 




007B 


NEXT count 




0086 


answer-workstring 




008E 


END 




PROCEDURE 


pri ntdate 




0000 


PARAM year. month .day. hour, mi n: BYTE 




0017 


PRINT year: "/": 




0021 


IF month<10 THEN PRINT "0": 




0032 


ENDIF 




0034 


PRINT month: "/": 




003E 


IF day<10 THEN PRINT "0": 




004 F 


ENDIF 




0051 


PRINT day; " at ": 




005E 


IF hour<10 THEN PRINT "0": 




006F 


ENDIF 




0071 


PRINT hour: ":": 




007B 


IF min<10 THEN PRINT "0": 




008C 


ENDIF 




008E 


PRINT min; "." 




0097 


END 


/«\ 
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Window Master V2.2 

The hottest new program available for the 
Color Computer 111! Now you can have 
Windows, Icons, Buttons, Pull-Down Menus, Edit 
Fields and Mouse Functions built into your Basic 
or Machine Language Programs easily and 
quickly, without the need for OS9. 

It supports up to 31 Windows on the display, 
multiple fonts in 54 possible sizes and styles, 
Enhanced Basic Editing and much more. It adds 
over 50 Commands and Functions to Basic to 
fully support the Point & Click Window System. 
In fact it has so many features it would take 
several pages to to describe them all. 

It is completely compatible with existing Basic 
programs and takes absolutely no memory 
away from Basic, h contains a built in Ram Disk 
which is completely transparent to Basic (512k 
version) for enhanced operation. 

it requires 1 Disk Drive, R.S. Hi-Res Interface & 
Joystick or Mouse. Includes both the 128k & 
512k versions for only S69.95 

Windo w- Ware 

Window Writer - A Point & Click Word 
Processor, features both Mouse & Keyboard 
type editing, proportional primer support, 
powerful formatting capability, works with any 
printer. On screen Italic, bold etc. WYSIWYG 
Requires Window Master & 512k- $59.95 
Window WrllcrAV - for non Window Master 
users includes all features as described above. 
Requires 512K & Disk $79.95 
Window Basic Compiler -A Basic Compiler 
similar to CBASIC only it compiles all the 
Window Basic statement! to create super fast 
M.L. programs & Desk Accessory programs for 
Window Master $99.00 
Window KDIZASM - A full featured 
Editor/Assembler and Debugger for the Window 
Master System $49.95 

Foul/Icon Kdilors - A utility disk with the Font 
& Icon Editors so you can edit or create your 
own, includes Basic & M.L. versions $19.95 
Advanced Proi; rammers Guide - A Guide for 
Basic & M.L. Programmers on interfacing to 
Window Masters complete system including 
System Calls, Memory Map, Interrupt handling 
& Extended Memory access. $24.95 
The Memory Came - A Concentration like game, 
lots of fun for everyone. $19.95 

512K RAM UPGRADE 

Give your COCO 3 all the power it deserves with 
this easy to install (no soldering/plug in) 100% 
Tandy compatible 512K memory upgrade. 
Completely assembled and tested. Includes 
Kamdisk & Memory Test software described 
below. $159.95, S12K + Window Master $199 

512K RAMDISK & TESTER 

RAMDISK is an ALL Machine Language 
program that will give you 2 ULTRA High Speed 
Ram Disks in you CoCo-3. Plus it allows your 
CoCo-3 to run at double speed all the lime even 
for disk access!!! It will not disappear when you 
press reset like some other ramdisk programs. 
The MEMORY tester is a fast ML program to lest 
Ihc 512K ram. It performs several bit tests as 
well as an address tesL 

Requires 512K & Disk $19.95 



CBASIC Editor/Compiler 

The ULTIMATE Color 
Computer BASIC COMPILER!!! 

If you want to write fast efficient machine- 
language programs and you don't want to spend 
the next few years trying to learn how to write 
them in Assembly language or with a cheap 
compiler, then CBASIC is the answer!!! 

CBASIC is the only fully integrated Basic 
Compiler and Program Editing System available 
for the Color Computer. It will allow you to take 
full advantage of all the capabilities available in 
your CoCo without having to spend years 
trying to learn assembly language 
programming. CBASIC allows you to create, edit 
and convert programs from a language you are 
already lamiliar with Enhanced Disk Color Basic, 
into fast efficient machine language programs 
easily and quickly. 

CBASIC supports all the enhanced hardware 
available in the CoCo 2 & 3, including Hi-Res 
Graphics, & Screen displays, Extended Memory 
and Interrupts. We even added advanced 
commands not available in Basic to give you a 
level of control only available to very advanced 
Machine Language Programmers. Plus we made 
it exceptionally easy to use, not like some other 
compilers. CBASIC is the friendliest and easiest 
compiler available for the Color Computer. 

CBASIC is a powerful tool for the Beginner as 
well as the Advanced Basic or Machine Language 
programmer. CBASIC features well over 150 
Compiled Basic Commands and Functions dial 
fully support Disk Sequential and Direct access 
files, Tape, Printer and Screen I/O. It supports 
ALL the High and Low Resolution Graphics, 
Sound, Play and String Operations available in 
Enhanced Color Basic, including Graphics II/GET, 
H/Put, H/Play and H/DRAW, all with 99.9% 
syntax compatibility. 

CBASIC makes full use of the powerful and 
flexible GIM1 chip in the Color Computer 3. It 
will fully utilize the 128K of RAM available and 
install 2 Ultra Fast Ramdisks if 512K is available, 
for program Creation, Editing and Compilation. 
You can easily access all 512K of memory in a 
Compiled program thru several extended 
memory commands that can access it in 32K or 
8K blocks and single or double bytes. 

CBASIC has its own completely integrated 
Basic Program Editor which allows you to load, 
edit or create programs for the compiler. It is a 
full featured editor designed specifically for 
writing Basic programs. It has block move and 
copy, program renumbering, automatic line 
number generation, screen editing, printer 
control and much more. 

Coco 1,2 or 3 Disk $149.00 



To order products by mail, send check or 

money order for the amount of purchase, plus 

$3.00 for shipping & handling to the address 

below. 
To order by VISA, MASTERCARD or COD call us 
at (702) 452-0632 
(Monday thru Saturday, Sam to 5pm PST). 

CER-COMP Lid. 
5566 Ricochet Avenue 
Las Vegas, Nevada 89110 
702-452-0632 



DataPack III Plus Vl.l 

SUPER SMART TERMINAL PROGRAM 

AUTOFILOTand AUTO-LOU Command t'roctssors 

X-MOOEM DIRECT DISK FILE TRANSFER 

VT-IOO Ji VT-S2 TERMINAL EMULATION 

No lost data even ji 2400 Baud on the Serial port. 

8 Selectable Display Formats, 32/40/64/80 columns 
ASCII & BINARY disk file transfer via XMODEM. 
Directly record receive data (Data Logging). 
VI'- 100 emulation for VAX, UNIX and other systems. 
VT- 100/52 cursor keys .position,, PF & Alt. Kbd. keys. 
Programmable Word Length, Parity, Stop Bits . 
Complete Full and Half Duplex operation, 
Send full 128 character set from Keyboard 
Complete Editor, Insert, Delete, Change or Add. 

9 Variable length, Programmable Macro Key buffers. 
Programmable Printer rales from 110 lo 9600 Baud. 

Send Files from lite Buffer, Macro Keys or Disk. 
Display or Print the contents of the 50k Duller. 
Freeze Display & Review information On line. 
Built in Command Menu (Help) Display. 
Built in 2 Drive RAMDISK for 512K RAM. 
Supports: R. S. Modem-Pak & Deluxe RS-232 Pak. 

Coco 1, 2 or 3 Disk - $59.95 

"The SOURCE" 

DISASSEMBLER & SOURCE 
CODE GENERATOR 

The SOURCE will allow you to easily & quickly 
Disassemble Color Computer machine language 
programs Directly from Disk and generate 
beautiful, Assembler Source code. 

• Automatic label generation. 

• Allows specifying FCB, FDB and FCC areas. 

• Disassemble programs Directly from disk. 

• Automatically locates address. 

• Output listings to the Printer, Screen or both. 

• Generates Assembler source directly lo disk. 

• Built in Hex/Ascii dump/display. 

• 8 Selectable Display formats 32/40/64/80 . 

• Selectable Foreground & Background colors. 

• Built in Disk Directory an Kill file commands. 

• Menu display with single key commands. 

• Written in Ultra Fast Machine Language. 

Coco 1, 2 or 3 Disk $49.95 

EDT/ASM III 

DISK EDITOR ASSEMBLER 

EDT/ASM III is a Disk based co-resident Text 
Editor & Assembler. It is designed to lake 
advantage of the new features available in the 
CoCo-3 with either I28K or 512K of memory. 
It has 8 display formats from 32/40/64/80 
columns. There is also a free standing ML Debug 
Monitor. 

EDT/ASM III has the most powerful, easy to use 
Text Editor available in any Editor/Assembler 
package for the Color Computer. 

• Local and Global string search and/or replace. 

• Full Screen line editing . 

• Easy to use Single key editing commands. 

• Loud & Save standard ASCII formatted files. 

• Block Move & Copy, Insert, Delete, Overtype. 

• Create and Edit files larger than memory. 
The Assembler features include: 

■ Supports Conditional IF/1TIEN/ELSE assembly. 

• Supports Disk Library file up to 9 levels deep. 

• Supports standard Motorola directives. 

• Allows multiple values in FCB & FDB directives 

• Allows assembly from the Buffer, Disk or both. 

Coco 1, 2 or 3 Disk $59.95 
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Many computer newcomers have little 
idea what to do with their new purchases 
once the excitement of 10 PRINT"HELLO 
": :GOT0 10 wears off. Many have only a 
small idea of what their CoCos can do. 
Then there are those who want to accom- 
plish a task not documented in Tandy's 
Extended BASIC manual — and they just 
can't seem to find a good way to go about 
it. Have no fear, beginner. Help is on the 
way. 

Over its eight-and-a-half years of publi- 
cation (and counting). THE RAINBOW has 
amassed a wide variety of hints and tips and 
one-line programs. These little words of 
wisdom and programming examples are 
sprinkled throughout past issues of THE 
RAINBOW, and readers consider them prizes. 

Now. in the interest of sparking your 
interest, we have scoured our back issues 
for these all-important CoCo tidbits. We 
have grouped the most basic yet most 
meaningful items here for easy reference. 

Of course if you are not a beginner 
(don't worry, we welcome all readers), you 
may have already seen many of these. 
Perhaps it is time for a review. 

Whatever the case, you will enjoy these 
laughably easy CoCo shorts. Use them as 
you build your own CoCo repertoire. 



Putting on the Brakes 

When using the STOP command to de- 
bug your program, ask for the information 
you want before you request the STOP ac- 
tion. For instance: 

10 INPUT"NUMBER". A 
20 IF A=3 THEN Y=10:X=30 
30 IF A-4 THEN Y-20:X=40 
40 PRINT X;Y:ST0P 

Line 40 shows the format used. It saves 
typing in the print request after the STOP 
command functions. It's a little thing, but it 
has saved me many finger strokes. 

Having RFI Problems? 

If you are receiving interference in the 
CoCo's video display on your TV. there 
may be a simple answer. If the set has a 75- 
ohm input connector (for cable TV), you 
can use a phono jack to F-connector adapter 
(Radio Shack 278-255) to plug the CoCo 
directly into (he TV without using the switch 
box. Check your TV's instruction manual 
for any special switches or jumpers that 
may have to be changed. 

Format Your Printouts 

Ted Cizadlo Selig. of Omaha. Nebraska, 
writes that this is "a utility I developed to 
generate a 32-column LL I ST of a program. 
I find this helpful in locating typing errors 
in listings from THE RAINBOW. The pro- 



gram must have an ASCII file ready and 
generates a listing of the program with your 
specified line width." The program requires 
a disk drive. 

The listing: 

5 CLEAR500:CLS:INPUT"NUMBER OF C 

HARS/LINE";CL 

10 INPUT"FILE NAME WITH EXTENTI0 

N(MUST BE IN ASCII F0RMAT)";N$ 

20 C-0:F=1 

30 0PEN"r.#l.N$ 

50 LINEINPUT #1.N$ 

60 IF EOF(l)— 1THEN F-0 

70 X-LEN(A$) 

75 IF X<-CL THEN 150 ELSE IF X=0 

THEN 50 
90 N=l 

100 FOR J-l TO INT(X/CL+1) 
110 PRINT#-2.MID$(A$,N,CL):C-C+1 
120 N-N+CL 
130 NEXT J 

140 IF F THEN 50 ELSE CL0SE#1:EN 
D 

150 PRINT#-2.A$:C-C+1:IF F THEN 
160 ELSE CL0SE#1:END 
160 GOTO 50 
170 CL0SE//1:END 



but it often causes confusion when some- 
one who doesn't know about it types in a 
program from a printed listing; if you cram 
too many additional characters into a line, 
you may also find that they will not list 
properly even though they are actually 
present. Finally, packed listings will not 
save in ASCII format properly. Because of 
these problems we don't recommend using 
this technique in programs intended for 
publication. 

Disk or Cassette and I/O Errors? 

Make sure that the disk drive(s) and 
cassette recorder are not on the left side of 
the TV set (or if they are, that they're at 
least half a foot or so away). This is because 
the flyback transformer (which is almost 
always on the left side of the TV) puts out 
a great deal of RFI that can interfere with 
cassette or disk operation. 

Upside-Down Loading 

If you're having problems with I/O 
Errors when loading programs from cas- 
sette, try reloading with the cassette re- 
corder placed upside-down. It may not be 
technically refined, and it may not work, 
but when you're faced with the dreaded 



Line Too Long? 

If you find that a 
line in a listing you 're 
typing in is too long, 
the reason might be 
that it was packed. 
When you type in a 
basic program line, 
the computer watches 
the length of the line; 
when the line is 240 
characters in length, 
the computer refuses 
to accept more char- 
acters. 

Ifyouneedtogeta 
few more characters 
on the line, press en- 
ter to place what 
you've already typed 
into memory, then 
type ED IT and the line 
number followed by 
enter. Press X to 
move the cursor to the 
end of the line. Now 
you can type some 
more characters into 
the line. The Edit 
mode has its own 
length limit, so the 
computer will take a 
few more characters 
and slop again. 

This trick does let 
you stretch your lines. 



"Simply Better" Word Processor 

•RUN 2 INTERACTING WORD PROCESSORS SIMULTANEOUSLY * 

PERFORM MAIL-MERGES ■ CREATE INDEXES ' CREATE TABLE OF 

CONTENTS • PRINT-FILL FORMS ' DISPLAYS FONTS IN SELECTED 

COLORS • DISPLAYS UNDERLINING ' PRINT SPOOLING ' AUTO SAVES 

FILES • SERIAL/PARALLEL OUTPUT ' PRINT/SAVE BLOCKS OF TEXT * 

HEARING IMPAIRED MODE ' UP TO 480K OF TEXT STORAGE ' SORT 

SECTIONS OF TEXT ' MANY MORE FEATURES ' 

". . . An excellent choice at an 
/^^ unbelievable price." 
*££? - Rainbow Magazine 

W* Simply Belter Version 2.0 . . J&trff 
(Holiday Special thru Dec. 15th. ..$29.95) 

SEE REVIEW AND ARTICLE IN 
APRIL '89 RAINBOW, SEE WHY . . . 

When It Comes To Word Processing, 

we're..." Simply Better" 

Call for a Free Brochure 
All Orders, Call... 1-800-248-8420 _ 

For Color Computer 3 only. Please add S3 S/H | M |'' , T ,«- 



Simply Better Software 

P.O. Box 20726 

Portland, OR 97220 
In Australia (07)3419061 



TECHNICAL ASSISTANCE 

9AM-5PM 
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I/O, it's worth a try. Rick Bullon, who sug- 
gested this method, says it works for him 90 
percent of the time. 

Undocumented Commands 

Here are a few EDIT subcommands that 
are not documented in the Extended BASIC 
manual. I found these when going through 
a Model I quick reference card and decided 
to try them. They are as follows: 

A: Cancel all changes, list the line and 
continue editing. 

Q: Cancel all changes, stop editing. 

E: Keep changes and stop editing, (same 
as ENTER) 

The A and Q can be very useful if you 
make a goof and don *t want to try and piece 
together a line or retype it. 

To Hex With Decimal 

To convert Hex to decimal, enter 
7&HXXXX. To convert decimal to Hex, enter 
?HEX$(YYYY). (This is where the four Xs 
equal the Hex number, while the four Ys 
equal the decimal number.) 

Single Disk COPY 

Here's a feature that can be invaluable 
for users with a single disk drive. The 
Radio Shack Disk Manual mentions that 
use of the COPY command requires two or 
more drives. This is not necessarily true. A 
single drive copy can be made by doing the 
following: 

1 ) Insert disk with file to be copied into 
Drive 0. 

2) Type COPY "FILENAME/ext:0" and 
press ENTER. 

3) After one short beep a notice appears 
on the screen instructing the user to insert 
the destination disk. 

4) Insert the destination disk and press 
ENTER. 

Once completed, there are two copies of 
the program: one original and one on the 
destination disk. 

This method works for all types of disk 
files, including machine language programs. 

Automatic Lowercase 

To move automatically into lowercase, 
type P0KE282.0. To return to uppercase, 
use POKE 282.1. 

No-List POKE 

If you would like to keep your program 
from listing, use POKE 383.158. To return 
to normal listing, type POKE 383 . 0. 

Slow Scrolling Through Orange 

Here's a powerful little POKE for the 
CoCo 1 or 2 that slows your scrolling by 
creating a horizontal LIST. Type POKE 359.60 
and you'll see what we mean. Add a colon 
(:) and SCREEN 0,1 and you'll be slow- 
scrolling across an orange screen. To return 
to the green screen at full tilt, just type POKE 



359 .126. These pokes do not work with the 
CoCo 3. 

Computer Fatigue 

One evening after a long period of use, 
my computer no longer recognized when a 
key was struck. A call to a local Radio 
Shack set me at ease. It seems that if one 
leaves the joysticks plugged in and condi- 
tions are right (or wrong, depending on 
your point of view), the joysticks some- 
limes block the keyboard signal. 1 unplugged 
them and had no more problem with my 
keyboard locking up. 

Speed Up Your CoCo 

You can double the speed at which CoCo 
1 or 2 operates with a simple POKE state- 
ment entered either directly from the key- 
board or within a program. The statement is 
POKE 65495.0. This will speed up your 
CPU. You can return the computer to nor- 
mal speed again with POKE 65494.0. Use 
POKE 65497.0 and POKE 65496.0 for the 
CoCo 3. 

Note that you cannot perform any Input/ 
Output operations, such as saving the pro- 
gram to cassette, when the speedup is in 
effect. You may also lose temporary key- 
board control. Ifth is happens, simply press 
the Reset button to brings things back to 
normal. 

Saving In ASCII 

When you save programs, CoCo can 
perform this function in two ways: by using 
binary codes or actual letters and numbers 
(called ASCII). 

Although it takes longer, ASCII some- 
times is a more accurate way to save a 
program, especially when you may be trans- 
ferring programs between systems. 

To save in ASCII, simply add a comma 
and an A to the end of your SAVE instruc- 
tion, like this: CSAVE"PR0GRAM".A and the 
ASCII save is done by the CoCo. 

Achieving a New Effect 

Here is a method for achieving a PC L EAR 
effect for Disk Extended Color BASIC. It 
is as follows: 

1. On power-up, POKE 25,14 and then 
POKE 26.0. 

2. Type NEW. 

Listen Up 

So you've got an I/O Error on the first 
save of your favorite program, and you 
can't remember how far along in the tape 
the second save is. What to do? Just keep 
typing CLOAD until the second save finally 
comes up? Steve Lipps, of Circle City 
Software, has a better idea. If you put a little 
space between your saves, as many of us 
do, then you can listen for the second save: 
Use AUDIO ON and MOTOR ON and listen for 
the silent space. Then you can use MOTOR 
OFF. A method even faster than MOTOR OFF 
is to press any key and then press ENTER, 
creating a Syntax Error that stops the re- 
corder. Then CLOAD the second save. 



Print Out Disk Directory 

If you have a long disk directory and 
svant to see all of it or if you simply want to 
have a hard-copy printout of your direc- 
tory, just POKE 11 1. 254: DI Rand the entire 
disk directory is printed on your printer — 
even if it is too long to be fully displayed on 
the screen. 

Handy Label Printer 

I simply got tired of seeing the hand- 
written labels on my disks. Some were very 
sloppy, and some were in different colors 
of ink. The following is a short program 
that prints out a nice-looking disk label. 
You can use gummed labels that feed 
through your printer or simply print them 
out on regular paper and then cut them out. 
using a glue stick to stick them on your 
disks. 

Edit the following lines: 

50 enter your name 

60 enter the date 

70 enter the software manufacturer's 
name if the label is for a copyrighted third- 
party program. 

Format is for the Epson printer, and all 
CHR$ commands should be changed to your 
printer's needs. 

10 P0KE150.1 "SETS UP 9600 BAUD 

RATE 

20 CLS 

40 PRINTS32. "ENTER FILE NAME/NUM 

BER":INPUTA$ 

50 B$-"DISK OWNERS NAME" 

60 C$-"DATE DISK FORMATTED" 

70 D$-"S0FTWARE MFCS TITLE" 

80 PRINT#-2.CHR$(14): 'DOUBLE WID 

TH 

90 PRINT//-2, CHR$( 27); ; "S"; -DOUBLE 

STRIKEM0DE 

100 PRINT#-2.CHR$(27);"E"; 'SETS 

EMPHASIZED MODE 

110 PRINT#-2.A$ 

120 PRINT#-2,D$ 

125 PRINT#-2.CHR$(27);"F":'CANCE 

LSEMPHASIZED MODES 

130 PRINT#-2.CHR$(15): , SETS C0ND 

ENSEDM0DE 

140 PRINT#-2.B$ 

150 PRINT#-2.C$ 

160 PRINT#-2.CHR$(27);"E";CHR$(1 

);CHR$(4) : -SETH0RIZ0NTAL/VERT TA 

B UNIT 

165 PRINT#-2.CHR$(11) 'VERTICAL 

TAB MODE 

170 CLS:G0T040 

Finding ML Addresses 

You can find the address of a machine 
language, loaded-from-cassette program by 
peeking several addresses in memory. 

To find the start address, use the 
command PEEK (487)*256 + PEEK(488). 

To find the end address, use the command 
PEEK(126)*256 +PEEKU27) -1. 

To find the execute address, use PEEK 
(157)*256 + PEEKU58). 
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CF New Calligrapher Graphics Clipix! "O 

Introducing 8 disks of graphics pictures I call Clipix. Each disk has over 60 
pictures. The introductory price of just $49.95 (save $30) for the complete set 
is available through Dec. 31st, 1989. Specify RS-DOS, OS9 or MS-DOS format. 



CALLIGRAPHER 

CoCo Calligrapher - Turn your 
CoCo and dot-matrix printer into 
a calligrapher's quill. Make beau- 
tiful invitations, flyers, certif- 
icates, labels and more. Includes 
three Vi inch high fonts. Works 
with many printers such as Ep- 
son, Gemini and Radio Shack. 
Over 135 additional fonts are 
available (see below). Tape/Disk 
(RS-DOS); $24.95. 

Calligrapher V2.0 - Prints all the 
same fonts as the CoCo Calligra- 
pher. It reads a standard text file 
which contains text and format- 
ting codes. You specify the fonts, 
centering, left, right or full justi- 
fy, line fill, margin, line width, 
page size, page break, page 
numbers, indentation, multiple 
columns, macros, headers, 

footers and more. Includes the 
same 3 fonts with additional 
fonts available below. Disk only; 
Specify OS9 or MS-DOS; $24.95. 

Calligrapher Fonts - Requires 
Calligraplier above. Each set on 
tape or disk with 8 to 10 fonts; 
Specify RS-DOS, OS9 or MS-DOS 
format; $14.95 each: 

Sct#l Reduced and reversed originals; 

Set #2 Old Style and Broadway; 

Set #3 Antique and Business; 

Sct#J Wild West and Checkers; 

Set #5 Stars, Hebrew and Victorian; 

Set #0 Block and Computer; 

Set #7 Small: Roman, Italics, Cubes, etc; 

Set #8 Novelty fonts; 

Set#0 Gallant and Spartan; 

Set #10 Several Roman fonts; 

Set #11 Gothic and Script; 

Set #12 More Roman and Italic; 

Set #13 Several Courier fonts; 

Set #1-1 Modern and Screen; 

Set #15 Tektron and Prestige. 

Economy Font Packages avail- 
able on disk only, with 25 to 30 
I'onts; Specify RS-DOS, OS9 or 
MS-DOS format; 29.95 for any 
one or save by buying two or 
more at $19.95 each: 

Pkg#l - Above fontsets 1, 2 and 3; 

I'kg #2 - Above font sets 4, 5 and 0; 

Pkg#3- Above fontsets 7, 8 and 9; 

Pkg#l - Above fontsets 10, 11 and 12; 

Pkg#5 - Above fontsets 13, 11 and 15. 



Calligrapher Combo Package - Includes the Calligrapher 
and any two Economy Font Packages (your choice) for 
only $59.95. Specify RS-DOS, OS9 or MS-DOS. 



New! Calligrapher Craphlcs Clipix 

The Calligrapher may now include graphics pictures, known as Cli- 
pix, along with the text it prints. There are currently 8 different Cli- 
pix disks available, each one has over 60 different graphic symbols. 
While the OS9/MS-DOS Calligrapher (especially V2.0) may easily com- 
bine both text and Clipix, the RS-DOS Calligraplier may also print out 
the Clipix. Clipix #1) Sports, #2, Miscellaneous, #3) Occupa- 
tions, #■■!) Occasions, #5) Vehicles, #6) KidStuff, #7) 
Astrology /Mythology, #8) Animals. Each Clipix disk is $9.95. 
See special offer above. 
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The Font Massager - This pro- 
gram allows you to do many 
things to Calligrapher font and 
Clipix files. Create new fonts, 
modify existing fonts, invert 
and compress fonts, double the 
height and /or width, halve the 
height and/or width and con- 
vert between RS-DOS and 
OS9/MS-DOS formats. Specify 
OS9 or MS-DOS; $19.95. 




For a complete catalog of Sugar Software products and fonts, 



This is a saiple of the 
dot-iatrix printer 
output froi the 0S9 
MS-DOS Calligrapher set 
ttTfull-justify the text rithin a 2.2 
inch vide coluin. The font used is 
the 12-point Courier font froi the 
font set 115 (or package 15) . 

send a stamp and a label. 
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"TRS-80 is a trademark of Tandy Corp. 



SUGAR SOFTWARE 

P.O. Box 7446 

Hollywood, Florida 33081 

(305) 981-1241 



Alt program* run on tkc CoCo 1, 2 ami S, S2K 
Extended Banc, untene othcrwiee noted. Add 
Si. 50 per tape or disk for shipping and han- 
dling. Florida residents add 6% sales lax. COD 
orders add $5. Dealer inquiries invited. Orders 
generally shipped in 2-1-48 hours. No refunds 
or exchanges without prior authorization. 
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Willi all these commands, you must ask 
CoCo to print the addresses as well as work 
out the formula. You can use the com- 
mands either in a program or in direct mode 
from the keyboard. 

RS-232 Baud Rates 
These poke values for the CoCo create 
the 16 most commonly-used baud rates. 
They areas follows: 



150 



Baud Rate 


POKE 149 


POKE 


50 


4 


88 


75 


2 


227 


110 


1 


246 


134.5 


1 


153 


150 


1 


110 


300 





180 


600 





87 


1200 





40 


1800 





25 


2000 





23 


2400 





18 


3600 





10 


4800 





7 


7200 





3 


9600 





1 



To achieve 19,200 baud, you must use 
the pokes for 9600 baud and then use the 
high-speed poke to double the CoCo's speed. 

Finding Those Bad Sectors 
I have seen dozens of programs that find 
bad sectors and then isolate them from 
BASIC. Yet all use DSKI$ and thus you 
always get J/O errors and have to manually 
continue the program to find other bad 
sectors. Below is a short program to find all 
bad sectors with no interruptions. Just enter 
it and type RUN. When the program finds a 
bad sector, it says so and then continues. 
Then you can use one of the dozens of 
programs already published to isolate that 
area. 

10 DEFUSR0=PEEK(&HC004)*256+PEEK 
UHC005) 

20 FOR T-0 TO 34: FOR S-l TO 18 
30 POKE 234.2: ' SET TO READ 
40 POKE 235.0: ■ DRIVE NUMBER 
50 POKE 236. T:" TRACK 
60 POKE 237. S:" SECTOR 
70 POKE 238.14:' DUMP TO THE 
80 POKE 239.00:" GRAPHICS AREA 
90 Y-USR0(0):P-PEEK(240) 
100 IF POO THEN PRINT "ERROR IN 
TRACK" :T;"- SECTOR" :S 
110 NEXT S:NEXT T 

Polling the Keyboard 

If you need to wait for a key to be 
pressed before continuing on with a pro- 
gram, insert EXEC 44539 at the desired point 
in the program. The computer will go on 
hold until any key is pressed. 

Painting Must Be Accurate 

When you issue a PAINT command, be 
sure thai you set the point at which the 



painting is to begin within the area that is to 
be painted. If you set the position on a line 
that encloses the area, PAINT will not work. 
Also when using PAINT, be sure your 
area is fully enclosed or the PAINT will leak 
out and cover the entire screen. 

Does the Trick 

After many failures by both Radio Shack 
in Texas and me to place - upc in the startup 
file (for OS-9), I received a call from the 
people there that did the trick. Add this to 
the startup file: tmode .1 -upc.Sofar.no 
problems have occurred. 

Rest Your Weary Head 

Before shutting down yourdisk system, 
use this command to move the drive head to 
Track 0: 

DSK1S 0.0.1.A$.B$ 

If you do this, the computer won"! have 
to reposition the head to Track the next 
lime you use the system. This stops the 
noise of the drive moving the head back and 
forth. 



One-Liners 



"^ This one-liner shows how the notorious 
PM0DE 4 color artifacts create a color pic- 
ture on your TV set or composite monitor 
using a black and white video signal. The 
display is also very nice to look at. 

1 DIMA(11):W=20:F0RC=4T05:PM0DE"4 
.1:PCLS:SCREEN1.1: GET (4.4) -(24.2 
4).A.G:F0RX=C T0228STEP2:Y=X* . 75 
:Z=174-Y:PUT!X.Y)-(X+W.Y+W).A.N0 
T:PUT(X.Z)-(X+W.2+W).A.N0T:PUT(X 
.86)-(X+W.106).A.N0T:NEXT:F0RT=l 
T0500:NEXTT.C:FORB=1T09999:NEXT 

Mike Napolitan 
W. Springfield, Massacluissetts 

ISP This program draws boxes of various 
sizes in one comer, then another and an- 
other and another. It then moves the de- 
signs over the screen using the PC0PY 
command. 

PCLEAR8:PM0DE4:SCREEN1:PCLS1:F 
0RA-0T03 : DRAWBM1 28 . 96C0A=A ; " : F0 
RZ=3T068STEP2:N=Z/6+l:PLAY"L255V 
31N=N : "" : DRAH""R=Z : D=Z : L=Z ; U=Z : BH3 
" : NEXTZ . A : F0RC=0T020 : F0RS=0T01 : S 
CREEN1:PM0DE4.5-4*S:S0UNDRND(255 
) . 1 : F0RY=1T04 : PCOPY Y+S*4T0Y -4*( 
Y<4)+1-4*S:NEXTY.S.C:RUN 

.1 aeques Paimelier 
Saint-Laurent, Quebec 

"^ This is a handy one-liner that gener- 
ates shopping lists and prints them on the 
printer. Just enter the name of the item and 
then a four-digit price (such as 1 .92, 20.99 



or 00.56). Always remember to get your 
printer ready before running the program. 

1 0IMA$(100).B$(100):CLS:PRINT"S 
HOPPING LIST GENERAT0R":PRINT"BY 
KEITH M. SCHULER"":PRINT:F0RC=1T 
0100:PRINT"ITEM #":C: :INPUTA$(C) 
:INPUT""PRICE(#.#)":BSIC):IFA$( 
CK>"""THENPRINT#-2."— $":B$(C) 
:" ";A$(C):NEXT ELSEPRINT"SH0PP 
ING LIST COMPLETE" 

Keith Schuler 
Merrit Island. Florida 



This one-liner sounds the Morse code 
for any letter key pressed. Wait until each 
character is complete before pressing the 
next key. 

1 Y$="?ETIANMSURWDKG0HVF?L?PJBXC 
YZQ":X$=INKEY$:IFX$=""THEN1ELSE: 
X=2*INSTR(1.Y$,X$):X$=""":F0RC=1T 
05:X=INT(X/2):X$=X$+CHR$(X+70):N 
EXT:X=INSTR(1,X$."G"):X$=LEFT$(X 
S.X-1):F0RC=LEN(X$)T01STEP-1:G=A 
SC(MIO$(X$.C.l)):SOUND200.((G/2- 
INT(G/2))*4+l)*2:NEXT:RUN 

Keith Stamps 
Prentiss, Missouri 

"^ You can create 3-D animation on the 
CoCo! This shorty draws a cube over and 
over, rotating it a few degrees each time. 

PMODE4:FORO=1T04:X(0)=COS(A)*4 
0+128:X(0+4)=X(0):Y(0)=SIN(A)*15 
+75:Y(0+4)=Y(0)+42:A=A+1.6:NEXT: 
A=A+1. 3962: RESTORE :PCLS:F0R0=1T0 
12:READS.E:LINE(X(S).Y(S))-(X(E) 
.Y(E)).PSET:NEXT:SCREEN1.1:G0T0: 
DATAl.2.2.3,3.4.4.1.5.6.6.7.7.8. 
8.5.1.5.2.6.3.7.4.8 

Kraig Brockschmidt 

Renton, Washing ton 

H3f Happyface is a graphics animation pro- 
gram that shows an animated head with 
moving lips. This should entertain the kids 
for hours. 

PM0DE4:PCLS1:SCREEN1.1:C0L0R4: 
CIRCLE(128.96).96.. .9:CIRCLE( 75, 
60).15:PAINT(75.60):CIRCLE(180.6 
0), 15 :PAINT( 180.60): CIRCLE! 128.8 
4).15:FORR=1T09:FORX=.02T0.4STEP 
.02:CIRCLE(128.138).49.,X:NEXT:F 
0RY=.4TO.O2STEP-. 02: CIRCLE! 128.1 
38).49.1.Y:NEXTY.R 

Doug Wylie 
Mentor, Ohio 

"^ Design draws a box that shrinks and 
changes shape. 

10 PM0DE3,1:SCREEN1.1:PCLS:F0R 
=1T05:X1=0:Y=191:X3=255:FOR Z=1T 
190:COL0R RND(8) : LINE(X1 .XI) - ( 
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X3.Y), : >SET,B:X1=X1+1:X3=X3-1:Y=Y 
-I: NEXT Z.Q 

Dan Wittig 

Warren, Pennsylvania 

"^ Rollover is a little gem that really shows 
off the graphics powers of the CoCb. 

1 PM0DE4.1:PCLS3:SCREEN1.1:F0RX= 
0TO3 : DRAWBM128 . 96 : S9C0A"+STR$( X 
)+"BG23F3G7NG2H8NG4E18NE4F8NE2Gl 
1H5NG2E2NH2E2NE2F5R3NF1NH1BG7NF1 
NH1U4":PCLS3:DRAW"BL3L10NL3U12NL 
6R26NR6D12NR3L16U7NL3R3NU3R3NR3D 
7F4ND2NU2BL14ND2NU2E4":PCLS3:NEX 
T:GOT01 

Ray H. Murray 
Florissant, Colorado 

l®" Night Strike is a neat little shoot-'em- 
up game. Center the enemy's chopper in 
your sights using the joystick and fire when 
ready. Caution: It isn't as easy as it sounds! 



1 PM0DE4:SCREEN1.1: 
96:C$="U1NL8NR8D1L1 
2E1U1H1NL1G1NR2NL2H 
00:PCLS:X=JOYS"K(0) 
)-*3:ClRCLE(X,Y).8:H 
D(10):0=0+H-5:P=P+V 
+STR$(0)+"."+STR$(P 

2 Q=PEEK{ 65280) :IFQ 
RX+3<0 0RX-3>0 0RY+ 
ENNEXT:ELSEP0KE359. 
"NIGHT-STRIKE REPOR 



PCLS:0=128:P= 

G1D1F1NG2R2NF 

1": FORJ-1T010 

*4:Y=J0YSTK(1 

=RND(10):V=RN 

-5:DRAW"S8BM" 

)+C$ 

=127 0RQ=2550 

3<P 0RY-3>PTH 

126:CLS:PRINT 

T:"."ENEMYKIL 



LED IN"J"M0VES". "AGAIN (Y.N)";: I 
NPUT D$:IFD$<>"Y"THENPRINT"MISSI 
ON TERMINATED":END:ELSE RUN 

Ric Small 
Searcy, Arizona 

"^ This one-liner animates a stick figure 
ainning across the screen. It demonstrates 
some principles of flicker-free animation, 
the use of a variable as a horizontal coordi- 
nate in a DRAW siring (-H ; ), and the use of a 
short PLAY pause as a delay. 

1 PCLEAR8:A$( 1 )="BR10U8NU6G4R3" : 
AS(3)="E8NU6D5E4":A$(2)="BU4E4R4 
NU6F4R3":PM0DE4.1:PCLS1:SCREEN1. 
1 : DRAWBMO . 96C0R255" : F0RX=240T01 
STEP-30:H=X:F0RY=1T03:PM0DE0.6 
: PCLS1 : PM0DE4 . 5 : DRAW'C0BM=h : . 95" 
+A$(Y):PLAY"P120":PCOPY6T02:H=H- 
10:NEXT:NEXT:G0T01 

Stan Osterhauer 
Sequiin, Washington 

"^ This program creates a cash register. 
It's great for those spring, summer and fall 
garage sales. 

FORX=1T099999:CLS:PRINT@41 ;»C'A 
SH REGISTER": I NPUT"PRICE:":P: INP 
UT'XASH TENDERED :":CT: PRINT :PRIN 
T"Y0U GET:":PRINT" ";CT-P:"$ 

BACK IN CHANGE":RT=P+RT:INPUTD:I 
FD<1THENNEXT X:ELSE PRINT"Y0U MO 
VED $";RT;" WORTH OF": PRINT"MERC 



HANDISE!!" 

Russ Rosen 
Cardiff, California 

"^ Pretend you are playing golf and putt 
the ball into the cup. Enter numbers from 
-2 to 5 to take aim. 

10 S=30 : Y=RND( 188 )+2 : PM0DE3 : PCLS 
:SCREEN1.0:CIRCLE<170.66).6.3..5 
:PAINT(170,66).3:F0RI=1T0S:CIRCL 
E(2.Y),3,2:NEXT:INPUTS:SCREEN1,0 
: F0RX=2T0173STEP7 : C IRCLE ( X . Y ) . 3 . 
2:CIRCLE(X.Y).3.1:Y=Y-S:NEXT:IFY 
<70ANDY>63THENPLAY"02:L24:12:12: 
03:1:3:9:7:5":END:ELSERUN 

Brad Lowe 
Lafayette, California 

"^"Type in Scroller as listed. Once you 
have seen what it does, change Line 1 to 
meet your own needs. This can be a pretty 
useful subroutine, too. 

CLS:PRINT@257,STR1NG$(30.42):P 
RI NT@129. STRINGS (30. 42): 0=28 :REA 
DA$:F0RX=1T0LEN(A$) +28: 0=0-1:0=0 
*SGN(0):P$=MID$(A$.X+(Q-27).28-Q 
):PRINT@194+O.P$:FORT=1T070:NEXT 
T.X: RESTORE: GOTO 

1 DATA DISPLAY ANY MESSAGE HERE 
BY REPLACING THIS MESSAGE WITH 
NE OF YOUR OWN IN LINE NUMBER 1. 
THE MESSAGE WILL BE REPEATEDLY 
DISPLAYED AS LONG AS YOU LIKE.O 



~\7~ T) /-v i* "f" ™ e Extended Port Interface (Q) ]TT1 1 V 
-tfVJrUl U for theCoCo 1,2, or 3. ^»« JT g 
Three buffered cartridge slots, 12 volts power, Sp /4 a qK 

use RS232-hard/floppy controllers & more! No need 

to replace your existing hardware! No need for new software. 
Slot switching to avoid ROM Conflicts, Introductory priced. 





TECUnOLDCIES 



Telepak Il.truly compatible RS232 pak. 
19,200 baud, uses standard Coco RS232 
addressing. Complete with cable. $49.95 



Double sided 1/2 Height Drives 

360 K 720 K %^£5S£m 
TEAC $89.95 $99.95 doublU^SO 

Name Brand $79.95 $89.95 Trlple-$15.00 



2400 baud modem & cable 

3 / 12 /2400 baud. Auto answer/ auto dial. Ollly 
AT command set. 2 year warranty, <h -fl -^ r* f\ c 
6 ft. cable . (specify 4-pin or DB25) vpl.5"." J 



From Alpha Software Technologies 

Disk manager tree....29.95 OS9 L II BBS..29.95 

Multi-menu 19.95 Warp One 34.95 

Level II tools 24.95 Presto Partner29.95 



UPDOS Coco III DOS 

HSAVE/HLOAD Graphics save. 
Easy to use M/L conflg. Auto 

boot Even OS9!.'Only$24.95 



[Turbo 512K RAMjgJJ£$89.95 

Premium 120iJ£raj«rrcnips! Complete 
with insL^OTpresTRam disk &spooler. 

Ok boa\>W/soitware.. $38.95 



4 pin - DB25 $12.95 

DB25m-m/m-f... $ 9.95 
Magnavox RGB.. $14.95 
Y-cables 2 slot...$27.95 



Vterm ..39.95-SuperComm..$29.95 



Call 316-946-0440 



Orion Technologies T.O. (Bok.63196 'Wichita, %S 67203 
M orders include $3.00 shpg/hdlg COD ^Additional $3.00. 
All prices US-funds. Actual shipping costs outside U3. 
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<><><>«<MESSAGE SCROLLER»X«B 
Y JIM COCKRUM>»<><><><> 

Jim Cockruni 
Martinsville, Indiana 

"^ Calligraphy simulates the use of a cal- 
ligraphy pen. After you input the pen size 
needed, you can move the right joystick to 
control the pen's location. 

1 IFF=0THEN0EF FNP( Q)=(Q+4 )/32- 1 
:CLS: INPUT"SIZE ( 1 - 10)" ; S:PM0DE4 
. 1: PCLS1 :SCREEN1 .0: F=l :G0T01ELSE I 
PSET(X.Y):X=ABS(X+FNPiJOYSTK(0)) 
):Y=AB'S(Y+FNP(.J0YSTK(1))):PRESET 
(X.Y):IFPEEK(65280)=1260RPEEK(65 
280)=254THENLINE(X.Y)-(X+S.Y-S). 
PRESET:G0T01ELSE1 

Patrick S. Davis 
Louisville. Kentucky 

"^ You're locked in acarhurtling at high- 
speed through the canyons of doom — can 
you safely make it through? Use the right 
and left arrow keys to steer. 

CLS: P=234 : V=l 1 : F0RW=5T01STEP - 1 
:F0RN=1T0P:V=V+(RND(3)-2)*((V<>1 
)*(V<>(30-W))):PRINT@480.§.TRING$ 
(V.128)STRING$(W.32)STR1NG$"C31-V 
-W.128):P=P-(PEEK(344)=247)+(PEE -. 
K(343)=247 ) : IFPEEKC P+1024K>128T 



HENPRINT@P."V"::NEXTN,W:PRINT"YO 
U WIN!"ELSEPRINT"CRASH!" 

Robert M. Dickau 
Sacramento, California 

1®° This program automatically puts ma- 
chine code into BASIC DATA statements. Just 
load the machine language code. RUN the 
program, set up a blank cassette to record, 
and input the start and end addresses of the 
code. When you CLOAD the resulting tape, 
your DATA lines are all complete. 



10 CLS:PRINT"RECORDER ON?": INPUT 
"START" :8:INPUT"EN0":E:OPEN"O".// 
- 1. "DATA": 0=10 :F0RK=B TO E STEP8 
:Q=Q+10:AJ=STRS(Q)+" DATA " : F0RJ 
=0T07:X$=STR$(PEEK(J+K))::A$=A$+ 
RIGHTS (X$.LEN(X$>-lt-r.":NEXTJ:P 
R1NT/M, LEFT* (A$.LEN( ASM ):NEXT 
K;CLQSEf-l:ST0P 

Dan Tandherg, M.D. 
Albuquerque. New Mexico 

"^ Here is a utility to display a slower, 
more organized directory listing, good for 
[hose who find it difficult to keep up with 
DIR's fast scroll-through. It handles up to 

72 files. 

CLSt:CLEAR2000:K=0:M=l:F0RA=3T0 
11:0SXI$ 0.i7.A.8$.C$:D$=B$+LEFT 



KC$.127):E$(0)-LEFTS(D$.8):FOR 

F=1T07:ES(F)=M1D$(D$.F*32+1.8):N 

EXT F : FOR G=0TO7 : PR I NT@K . "#" ;M" }" 

E$(G):K=K+16:M=M+1:IF K>500THEN 

K=480 

1 EXEC44539:NEXTG:NEXTA:END 

John M. Beck 
Suitland, Maryland 

"^ This short program converts fractions 
to their decimal counterparts. 

1 CLS:PRINT:PRINT" NUMERATOR": P 

RINT" ":PRINT"DEN0MINAT0R":P 

R I NT: INPUT" INPUT NUMERATOR ";A: 
PRINT" — ":INPU 

""INPUT DENOMINATOR" :B:D=(1/B)*A 
: PR1 NT@330 . A : "/ " : B ; "=" : : PRI NTUS I 

Charles A. Kietlaisch 
Mokena. Illinois 

"^ This shows how you can scale a DRAW 
command string. It draws a number of 
airplanes that are all the same shape, but 
some are large and some are small. 

1 PM0DE4.1:PCLS:SCREEN1.1:F0RT=8 
T0170STEP15:L$-"S"+STR$(RND(5)+1 
)+"BM"+STR$(RND(170)+10)+"."+STR 
$(T)+"R9U3R6D6G3L15D1F2G2H2E2U1L 
3H3D3U6D3E3D3R8L8U3R8U3L8R2D2":D 



^KILLER A' s^^i 

by William Cotton 

New for the CoCo III 
Vanquish your fear of the unknown. Rid 
your base and its ships of the deadly 
aliens. Just like the arcade version, this 
game is sure to be a winner. 

Joystick required. $24.95 

BURIED BUXX II 

This sequel to Buried Buxx is for the CoCo 3 and 
has better graphics, more color and lots of non- 
stop action. Game configuration screen, high 
score save and more! Joystick required. $24.95 



Many more programs available. 
Call or write for a complete listing. 



JR & JR SOFTSTUFF 

RO. BOX 118 • Lompoc, CA • 93438 • (805) 735-3889 



Ma 



»iCo<d 



Orders accepted 24 hours a day. 
All programs on diskette only. 



VISA 

All orders add S3.00 shipping. C.O.D. orders $4.00 additional 





COLOR RIBBONS & PAPER 






COLOR RIBBONS COLOR PAPER 






RED. BLUE. GREEN. BROWN. PURPLE. YELLOW 


BRIGHT PACK - 
200 Sheets. 50 ea. color: 






Ribbons Price Eacb 


Black 


Color 


Heal 












Transfer 


Red, Blue. Green, Yellow, 














9 12 • 11 SI I.SOrpk. 






Radio Shack - 
DMP" 130 


6.50 


8.00 




PASTEL PACK - 






DMP 110 


4.50 


5.2b 


5.75 


200 Sheetsi'50 ea. color: 






- DMP 120 


6.75 


7.75 




Pink. Yellow, Blue, Ivory. 






- DMP 130 132 
DMP 200 


5.25 
6.75 


6.50 
7.75 


7.95 


9 1/2 x 11 - S11.90pk. 












- DMP 230/520 


4.00 


5.25 


_ 


COLOR BANNER. 






DMP 410-510 


5.00 


7.00 


_ 


PARTY BANNER. 






- DMP 430 


12.00 


- 


- 


CHRISTMAS BANNER, 
HAPPY B-DAY BANNER. 






Apple Image I'll 


3.75 


4.50 


6.50 


CONGRATS BANNER - 






Citizen 120180D 


5.00 


6.00 


7.95 


45 Roll - 59.95'Ea. Roll 






Epson MX80 1X800 


3.75 


4.25 


6.75 








Okidaia 180.192 


6.50 


7.50 


6.00 


COLOR CERTIFICATE 






Panasonic KXP 1080 


6.75 


7.75 




PAPER - 






Seikosha SP 8001000 


5.25 


6.50 


7.95 


100Shts..Pk. - S9.95/Pk. 






Sisi NIX 10/NL 10 


5.00 


6.00 


7.95 


GREETING CARDS - 






Star NX 1000 


4.50 


5.50 


6.75 


50 Cards & 40 Env 'Pk. - 






Star NX 1000 4-Color 


- 


8.75 


- 


511.95/Pk 






T-SHIRT RIBBONS (Heat Transfer) - Call For Price & Avail. 






COLORS: Rett, Blue, Green. Brown. Purple. Yellow, Black 






COLOR DISKETTES 






5 1/4 - DS'DD Rainbow Pack, 10'pack - S 12.50 






For ribbons & paper not lisled above, call for price. Price & spec, subject to change w'o 






nollce. Mm. order 525.00. S & H 53.50 minimum Visa. M.C., C.O.D. 






RAMCO COMPUTER SUPPLIES 






P.O. Box 475, Manteno. IL 60950 U.S.A. 






|U. S.A.I 800-522-6922 • ICanatlal 800-621 5444 






815-468-8081 
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AINBOWfest is the only computer show 
dedicated exclusively to your Tandy Color 
Computer. 




V 



Nowhere else will you see as many CoCo- 
related products or be able to attend free seminars conducted by the 
lop Color Computer experts. It's like receiving the latest issue of 
THE rainbow in your mailbox! 

RAlNBOWfest is a great opportunity for commercial program- 
mers to show off new and innovative products for the first time. 
Chicago, Illinois is theshow to get information on capabilities for 
the CoCo, along with a terrific selection of the latest CoCo 
software. In exhibit after exhibit, there will be demonstrations, op- 
portunities to experiment with software and hardware, and special 
RAlNBOWfest prices. 

Set your own pace between visiting exhibits and attending the 
aluable, free seminars on all aspects of your CoCo — from im- 
proving BASIC skills to working with the sophisticated OS-9 oper- 
ating system. 

Many people who write for THE RAINBOW — as well as those 
who are written about — are there to meet you and answer ques- 
tions. You'll also meet lots of otherpeople who share your inter- 
est in the Color Computer. I t's a person-to-person event and a tre- 
mendous learning experience in a fun and relaxed atmosphere. 

As an additional treat for CoCo Kids of all ages, we've invited 

I 



frisky feline CoCo Cat to join us for the show. RAlN- 
BOWfest has something for everyone in the family! 
If you missed the fun at our last RAlNBOWfest in Som- 
erset, New Jersey, why don 't you make plans now to join 
us in Chicago? For members of the family who don't j 
share your affinity with the CoCo, there are many 
other attractions in the Chicago area. 
The Hyatt Regency Woodfield — Schaumburg, 

Illinois, offers special rates for RAlNBOWfest. 

The show opens Friday evening with a session from 

7 p.m. to 10 p.m. It's a daytime show Saturday — The 
CoCo Community Breakfast (separate ticket required) is at 

8 a.m.. then the exhibit hall opens promptly at 10 a.m. and 
runs until 6 p.m. On Sunday, the exhibit hall opens at 1 
a.m. and closes at 3 p.m. 

Tickets for RAlNBOWfest may be obtained directly from 
the rainbow. We'll also send you a reservation form so you can 
get the special room rate. 

The POSH way to go. You can have your travel arrangements 
and hotel reservations handled through RAINBOW affiliate. POSH 
Travel Assistance, Inc., of Louisville. For the same POSH treat- 
ment many of our exhibitors enjoy, call POSH at (502) 893-33 1 1 . 
A 1 1 POSH services are avai lable at no charge to RAlNBOWfest at- 
tendees. 

RAlNBOWfest - Chicago, Illinois 
Dates - April 6-8, 1990 
Hotel - Hyatt Regency Woodfield 
Rooms - $69 per night. Single or Double 



FREE T-Shirt to first five ticket orders received from each state! 




YES, I'm coming to Chicago! I want to save by buying tickets now at the special 
advance sale price. Breakfast tickets require advance reservations. 



Name 



'"1 



Three-day ticket(s) at $9 each 


total 


One-day ticket(s) at $7 each 


total 


Circle one: Friday-Saturday-Sunday 




Saturday CoCo Breakfast 




at $12 each 


total 


RAlNBOWfest T-shirt(s) 




at $6 each 


total 



(please print) 

Address 

City 



Specify size: 
S 



M 



Telephone 
Company _ 



. State . 
ZIP 



L 



XL 



$1.00 



(T-shirts must be picked up at the door) 
Handling Charge $1 

TOTAL ENCLOSED _ 
(U.S. Currency Only, Please) 

□ Also send me a hotel reservation card for The Hyatt Regency 
Woodfield ($69, single or double room). 

Advance ticket deadline: March 23. 1990. Orders received less than iwo weeks prior to show opening will be held for you ai the door. Tickets will also be available at the door al a slightly 
higher price. Tickets will be mailed six weeks prior to show. Children 4 and under, free: over 4. full price. 

Make checks payable to: THE RAINBOW. Mail to: RAINBOWrcsi. The Falsolt Building. 9509 U.S. Highway 42. P.O. Box 385. Prospect. KY 40059. To make reservations by phone. 
| in Kentucky call (502) 228-4492. or outside Kentucky call (800) 847-0309. 



□ Payment Enclosed 

□ VISA □ MasterCard □ American Express 

Account Number 

Exp. Dale 

Signature 






RAW Lt:NEXT T: FORP=1T0900000: FOR 
0=1T0900000:NEXT0:NEXTP 

Bryan Copeland 
Keith ville , Louisiana 

"^ This program will turn yourCoCo into 
an alarm system to guard against any little 
"door-slammer" who may want to bang on 
those keys if you have to leave the room. 
Just turn up the TV volume and wait. 

10 A$=INKEY$: IFA$=""THEN10ELSEF0 
RX=1T05:Y=RND(8):CLSY:SOUND150.8 
:PRINT@224."D0 NOT TOUCH THOSE K 
EYS AGAIN !!":F0RT=1T0100:NEXT:S 
0UND180.8:F0RT=1T0100:NEXTT,X:CL 
S:60T010 * 

Tom McCarthy 
Sterling, Virginia 

"^ This one-liner for disk users automati- 
cally saves a program on disk before run- 
ning it. if you enter the RUN command in a 
special way: 

RUN'TEST 

If you add the apostrophe and a file- 
name, this line will see the apostrophe, read 
in the filename and save the program with 
thai name. 
10 CLS:CLEAR200:IFPEEK(734)=131T 



HENP0KE749.0:F0RT=735T0749:IFPEE 
K(T)O0THENA$=A$+CHR$(PEEK(T)):N 
EXTELSEPRINT0256. "SAVING PROGRAM 
":PRINT"NAME: "A$: P0KE65494 .0: VE 
RIFY0N:SAVEA$:VERIFY0FF:P0KE6534 
4.0: F0RT=1T0300: NEXT: P0KE734.0:R 
UN 

Victor Capton 
Troy, Michigan 

"^ This one-liner displays all the num- 
bers from zero to 255 with their hexadeci- 
mal and binary equivalents. 

1 PM0DE4.1:PCLS:G=PEEK( 1861*256+ 
PEEKt 187 ) : F0RN=0T0255 : POKEG. N : PR 
INTN" "HEX$(N)" "::FORX=0TO7: 
IFPP0INT(X.0)THENPRINT"1"::IFX=7 
THENNEXT: PRINT: NEXT :ELSENEXT: ELS 
EPRINT"0"::IFX=7THENNEXT:PRINT:N 
EXT:ELSENEXT ' 

Todd Knudsen 
Sandy, Utah 

"^ This educational one-liner asks you to 
solve ten multiplication problems. When 
you have finished, it tells you how many 
seconds it took you to solve them. 

CLS:PRINT"TIMED MULTIPLICATION 

QUIZ": INPUT"ENTER TO BEGIN":A$: 

TIMER=0:FORZ=1T010:A=RND(12):B=R 



ND(12):PRINTA"*"B::INPUTC:IFCOA 
*B THENPRINT"WRONG CORRECT ANSWE 
R IS":A*B:Z=Z-1:NEXT:ELSEPRINT"C 
ORRECT":NEXT:PRINT"IT TOOK Y0U"T 
IMER/60"SEC. FOR 10 DUES." 

Robert Davis 
Dallas, Oregon 

Kip Times simply displays a standard multi- 
plication table. 

10 CLS:PRINT@10. "TIMES TABLES":P 
R1NT: F0RX=1T010 : PRI NTX ; -.NEXT : FOR ' 
X=2TO10:FORY=lTO10:P$=MID$(STR$( 
X*Y).2):PRINT@30+32*X+3*Y.P$:NEX 
T:NEXT:EXEC44539 

Leonard Dalenberg 
Virginia Beach, Virginia 

lEg* This program finds "palindrome 
squares," which are integers that when 
squared produce numerical palindromes. 

1 N=N+1:S$=STR$(N*N):T$=RIGHT$(S 
$.LEN(S$)-1):F0RX=1T01NT(LEN(T$) 
/2):IFRIGHT$(LEFT$(T$.X).l)OLEF 
T$(RIGHT$(T$.X).1)THEN1ELSENEXT: 
PRINTN"S0UARED ="N*N:G0T01 

Stanley Townsend 

Al turns, California 

/PS 



ofyouMinances With CoCO-AcCOUIltant 3 

If you're like most of us, keeping track of your finances is a hassle. Messy check- 
books, boxes full of old receipts, and panic at income tax time. But your Color Computer 3 
can turn you into a financial wizard if you have Coco-Accountant 3. 

This full-featured, home and small business accounting program answers the three 
big questions we all have about our money: Where did it come from? Where did it go? And 
what can I deduct from my income taxes? 

CoCo-Accountant is easy to use and menu-driven. Just set up a list of accounts and 
start entering your transactions. Checks, credit cards, cash, paycheck information, inter- 
est. In any order. Just toss it in and CoCo-Accountant sorts it out. Here's what Coco-Ac- 
countant will do: 

■ List and total transactions by account, for any month or the whole year. 

■ List and total transactions by payee or income source, for any month or whole year. 

■ List and total transactions by month, with income, expense and cash flow summaries. 

■ Quick year to date account and month summaries. 

■ Printed spreadsheet showing activity by account and month for the whole year! 

■ List and total tax-deductible expenditures and taxable income by account. 

■ Quick, easy checkbook reconciliation. 
Coco-Accountant 3 will run on any CoCo 3 with a disk drive. And it's only $39.95. (We also have Coco- 
Accountant 2, with most of these features, for 64K Color Computers at $34.95). Send check, money order or 
credit card information to Federal Hill Software at the address below or call our Toil-Free Order Line at 
1-800-628-2828 Ext. 850. Order now and bring your finances into the Computer Age! 




Toll Free Orders 

1-800-628-2828 

Ext. 850 



Federal Hill Software 8134 Scotts Level Rd., Baltimore, Md. 21208 Info. 301-521-4886 
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C™ED Window WHter 1.2 

What we;beii ; ie#!ei!p.bf:the : :^est;:^ordproce^pr available for OS/9 just got better! You asked and we listened. We 

have added new features which the public has requested! 

DYNASPELL 102K WORD SPELLING CHECKER NOW AVAILABLE! 



More Versatile and Powerful. OS/9 Allows you Freedom and Power. The mouse 
and pull-down menus give you speed and ease of use. 



Quit Box 



Pull-Down Menus 
± 



[] Fife Edit Format Search* Style Help 



SWVL's Window .Witter, a now OS/9 word processor. 


Text Cursor 






■ 




/ 




Mouse Cursor 



Pg 1 Linel Col 1 Insert On WWrap On File: name 



Text Cursor 
Position 



Insert Toggle 



Multi -Tasks 

Window Writer is 
the first Color Com- 
puter word processor 
which takes full ad- 
vantage of OS/9. The 
result is a word 
processor which is 
fully as modern and 
professional in action 
as those previously 
available only for the 
IBM and Mac. The 
operating system al- 
lows true multi-task- 
ing with other 
programs or itself. 
Not limited to just 
printing one file and 
editing another. You 
can print one file in one window while you edit files in other 
windows. At the same time you can be running a small program 
in another window. You can cut and paste between sections of 
files in different windows. 

Hi-Res Display 

Window Writer uses an 80-column monitor display screen for 
clarity. As shown in the above screen drawing, you can quickly 
see how to access the menus and help screens. You can deter- 
mine the current position by page, line number, and column. The 
mouse can use this section to quickly change to a specific page 
or line in the file. The text insert and word wrap toggles also are 
indicated and changeable with the mouse button. 

Ram Disk 

A RAM disk is set up in Window Writer to make full use of 
all or a user specified portion of the memory on the 512K CoCo 
3. On the 128K CoCo a smaller RAM disk is set up to still allow 
use of all available memory for file editing. For use of all features, 
a 512K machine is required. 

The RAM disk is used for storage of the file(s) being edited, 
for ihe clipboard for cut and paste, and as a print spooler for the 
file being printed. Window Writer's clipboard can be saved to 
disk or pasted into any file being edited because files use the same 
clipboard memory. The RAM disk also can be used with other 
OS/9 programs. 

Mail-Merge 

With Window Writer you can create form letters and send 
them out to a list of addresses in an address file. First names or 
other information can be added to "personalize" these letters. 



Up and Down 
Arrows 



M \/ 



Word Wrap 
Toggle 



Current .. 
File Name 



(or joystick) or can be accessed by control keys. 



Pull Down 

Menus and 

Help Screens 

A full selection of pull 
down menus and detailed 
help screens make learn- 
ing easy and are only a key 
stroke (or mouse click) 
away. All menus and help 
screens can be user con- 
figured for everything in- 
cluding menu colors and 
contents. You don't like 
the color of a menu? You 
think one help item 
should be listed different- 
ly? Change them! 

The menus and help 
screens can be reached by 
cursor keys or the mouse 




French Version: 

An abridged French 
translation of the Window 
Writer manual is now avail- 
able. This manual is written 
by a Canadian CoCo user 
and will aid French speak- 
ing users. Only $7.50 addi- 
tional. 



Ed i ting is a snap with OWL's Efficient Mouse Usage! 



Editing 

Like most modern word processors, with Window Writer 
there is always more than one way to access any editing feature. 
You can access editing by menus using 
mouse, "keyboard mouse", or through 
control keys. Full help screens are 
quickly available for all editing fea- 
tures. A help screen can be left visible 
while needed and then quickly 
removed logel back to full screen edit- 
ing. 



More 



One nice feature is the price: 

only $59. 

For the DynaSpell Spelling 
Checker by Dale Puckett includ- 
ing the 102 K Word Dictionary: 

only $20. additional! 




P.O. BoxI16-A 
Merfzlown, PA 19539 

— ORDER LINES (only) 

(800) 245-6228 
(215) 682-6855 (PA) 




Pro ven 



On the Razor's Edge of 



The Hard Drive's New Frontier: 



The Most Advanced Color Computer 
Hard Drive System Ever Offered! 

Fast No-Halt SCSI Floppies Using Optional SCSI Controller 
Proven Performance for Demanding Home or Business Users 



OWL-WARE has now been supplying 
Color Computer hard drive systems lor 
over 4 years. We have reached our posi- 
tion in the hard drive market by 
providing our customers with a high 
quality product that they can be proud 
to own and use. Our first concern has 
always been quality and sound design. 

We are now announcing our most ad- 
vanced hard drive system ever. Using 
the optional OMTI 5200 SCSI control- 
ler with our Hard Drive Interlace, our 
new system will support no-halt floppy 
drives. You need not wait while typing 
or worry about clock time losses. Why 
be limited to 3 floppy drives? A com- 
plete system could now consist of 1-3 
standard CoCo floppy drives, 1-2 (or 
more) hard drives, and 1-2 no-halt flop- 
pies using standard (not just CoCo) 
OS/9 format. You can use single or 
double-sided 40 or 80 track drives with 
the SCSI no-hall controller. 

There are several new features with this 
improved interface. These include: 



• lull SASI/SCSI compatible (this al- 
lows many add-ons to the versatile 
SCSI buss) 

• No-Halt Floppies with optional SCSI 
controller allows lull type-ahead 
during access 

• Low factory-direct prices 

• Fast Delivery from factory stock 

• Optional Real Time Clock with built 
in battery (3-10 year lifetime) 

•With the Clock you have 240 Bytes of 
battery backed up RAM lor password 
protection or data storage! 

• Same super stable LRTech quality 

Our quality is obvious when compared 
to any other Hard Drive system or inter- 
face. Even the box is special. Our 
systems have always had a fan. Has our 
competition just heard about them? 






Interface Price only: $85. 
Real Time Clock-RAM: $25. 






20 Meg. 40 Meg. 80 Meg. 

(2X40 Meg.) 
System Prices: (Includes Hard Drive, case, & fan, SASI Controller*, 
LR/QwLinterfaCe, Software. Fully assembled and tested.) 

I $519. $629. $929. 

Super System Prices: (lr/owl System as above but omti 5200 
SCSI Controller AND 3.5" 80 Track Floppy Drive in same case) 

$649. $759. $1 099.(2 cases) 

*SASI controller is unused surplus. Add $75 for OMTI SCSI 



Now Available with High 

Density 5.25" drives as 

well as 720K! 

Disk Capacity of more 
than 1 Meg Formatted! 

Same low price as our 

720K super systems 

listed below. 



OWL Hard Drive BASIC 3 

There have been several ads in this 
magazine about BASIC for Color 
Computer hard drive systems. These 
ads sometimes only tell a part of the 
story. Our BASIC system price in- 
cludes assembly, testing, and 3-day 
burn-in period. We do not require a 
Mulli-pak to operate. 

Our hard drive systems arc fast, reli- 
able, and reasonable in price. This has 
been proven by hundreds of users over 
the past 4 years. We do not have to turn 
off error checking for speed. We 
achieve high speed BASIC from a uni- 
que indexing method. 

OWL HD BASIC 3 is very fast due to 
our index method. Almost all BASIC 
commands work normally including 
DSK1NI, DSKIS, and DSKOS. 

BASIC for Hard Drives 

Prices: With/Without Hard 

Drive 

$35./$79. 



Technology 



the Color Computer Frontier 





Floppy Drive Systems 

The Highest Quality for Years of Service 
Drive Systems (Half Height, Double Sided, 

Direct Drives) 5j>iyy» 

Drive systems complete with drive, controller, legal DOS, cable, case, 
power supply, and manual 

Drive 1 Systems (Half Height, Double Sided, 
Direct Drives) 3>1^". 

New 3.5", 720K Drives for OS-9 with case 

& Power Supply $1 69. 

Drive 1 Systems have drive, case, power supply. (You may require op- 
tional cable and/or DOS chip to use) 

Special for 0/1 Combos (Drives 
0,1,2,3) $295. 



HALF- HEIGHT DRIVE 
UPGRADES FOR RS HORIZON- 
TAL CASES 

Why only double the capacity of your 
system when you can it iple in the same 
case? Kit includes: double-sided to fit 
your case, chip to run both sides of new 
drive, hardware, and detailed instruc- 
tions. Easy! Takes only 5 minutes! 

Model $11 9. Model $129. 

500 501 or 502 



All drives arc new and fully assembled. 
We ship only FULLY TESTED and 
CERTIFIED at these low prices. We 
use Fuji, YE Data, and other fine 
brands. No drives are used or surplus 
unless otherwise staled to you when 
you order. We appear to be the one of 
the few advertisers in Rainbow who 
can truly make this claim. We have 5 
years experience in the CoCo disk 
drive market! We are able to provide 
support when you have a problem. 



OWL Phones 

Order Numbers (only) 

1-800^245-6228 

1-215-682-6855 

Fax: 1-215-837-1942 

Technical Help 

1-215-837-1917 



OWL WARE Software Bundle 



Disk Tutorial/Utilities/Games 
DISK TUTOR Ver 1.1 

Learn how to use your disk drive from 
this multi-lesson, machine language 
program. This tutor takes you through 
your lessons and corrects your mistakes 
for a quick, painless disk drive introduc- 
tion. (This professionally written tutor 
is easily worth the bundle's total price.) 

3 UTILITIES 

A copy verify, copy, and DOS utility. 

2 GAMES 

We will select 2 games from our stock. 
These are sold for more than $20 each. 



Do not mistake this software with cheap 
Public Domain" software which others 
offer. All of this software is copyrighted 
and professional in quality. The tutor is 
unique with us and has helped 
thousands of new users learn their disk 
drive. 



only $27.95 

(or even better) 

only $6.95 with 

any Disk Drive Purchase!! 



512K Upgrade 

Agitio at a popular price. Fully as- 
sembled and tested before shipping. 
Easy to install. Uses fast 120 ns. chips. 

Only $99. 

IS ow includes memory test, Ram Disk 
Lighting, Printer Lighting, and Back- 
up Lighting. All with an upgraded 
manual exclusive with OWL! 



Our prices include a discount for cash but 
do not include shipping. 

OWL-WARE has a liberal warranty policy. During the warranty 
period, all defective Items will be repaired or replaced at our 
option at no cost to the buyer except tor shipping costs. Call 
our tech numbs* 'c •et'j'" Return of non-defective or un- 
ai/honjed rectus a'e sjoiec' 'n a service c *-.*•;>• 



Drives 1 Year Warranty 



OWL-WARE 

RO. BOX 116 

Mertztown, PA 19539 



Feature 



Running against the clock and away from deadly skulls 



One Tile at a Time 



by Nick Bradbury 




he Frustrator is a game for the 
CoCo 3 thai combines the strat- 
egy of thinking games with the 
fast action and graphics of ar- 
cade games. The game is played 
on a seven-by-seven grid, and 
your task is to fill the grid with 
tiles before your time runs out. 

On the first few levels of the game, this 
is a relatively simple task to complete. 
However, more and more obstacles will 
hinder you as the game progresses. You 
see, the computer tends to cheat a little by 
removing some of the tiles every now and 
then. Also, the computer attempts to block 
you by placing skulls in your path. If you hit 
one of these skulls, the game is immedi- 
ately ended. 

Game Play 

When the game begins, you are asked to 
select the level of difficulty. First-time 
players should begin at Level 1 to get used 
to the joystick control and game play, but 
experienced players can begin at Level 4 or 
higher for a greater challenge. Although 
you may only begin at levels 1 through 9. 
there are many levels beyond these. It is 
unlikely that many players will get beyond 



Nick Bradbury, a junior in advertising at 
the University of Tennessee, works as a 
cartoonist for the daily college newspaper 
there. His previous CoCo works include 
Moon Runner and Legend Quest. He can 
be contacted at 712 Forest View Rd., 
Knoxville. Tn 37919. 



Level 14or \5. [Editor sNote.This sounds 
like a direct challenge if you ask us.] 

The right joystick controls the gray x 
and y markers on the screen. This takes 
some getting used to. so you may want to 
play a few practice games first. Pressing the 
red button on the right joystick places a tile 
in the square corresponding to your mark- 
ers. You must place a tile in every open 
square on the grid to advance to the next 
level of play. The first three levels are 
relatively simple because you are only 
required to place one (red) tile in each 
square, but every level beyond three re- 
quires two tiles (first a purple, then a red) in 
each square, which makes the game much 
more challenging. 

Your opponent in The Frustrator is none 
other than your once friendly CoCo, which 
attempts to stop you from completing the 
grid. The first and most frustrating way it 
does this is by occasionally removing tiles 
you have placed. Another way the com- 
puter tries to hinder you is by placing skulls 
in your path. If you try to place a tile on a 
skull, your game is finished. Any skull 
placed on the grid remains until the end of 
the level. Points are awarded for every skull 
remaining on the grid when you have 
completed the level. 

Plus and minus signs are also randomly 
placed on the grid. Plus signs add points to 
your score while minus signs take points 
away. Yourtimercan be increased by pick- 
ing up a square occupied by a large T that 
also appears at random. 

Flashing question marks are best avoided; 
when selected, these question marks alter 



the way your joystick controls tile place- 
ment. There are three variations in joystick 
control: 

(1) Single touch 

(2) Release and press 

(3) Continuous 

When you are asked to choose your 
starting level at the beginning of the game, 
you can press V to select a different joy- 
stick variance to begin the game. After 
every third level you enter a bonus round 
during which you can earn extra points. 
Strange "eyeball" creatures appear and 
disappear in the grid. To earn bonus points. 



Table 1 Important Variables 

sc - score 
tm - timer 
rn -level # 
zt - # tiles placed 
zp -# tiles possible 
\ x,y - x and v positions of player's 
markers 
ti - counter for timer 
. va -joystick variation ( 1 -3) » 
, bo - 0=regular level, l=bonus level 
xi, xi - ..vand v positions to place objects 
sk -# skulls on screen 
se - # eyeball creatures hit on 

bonus level 
co (i) - palette colors (I=PaIette 

Register #1) 
ci (is and C2 (i) - tile and background 
colors (i=ievei #) 
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you must act as though you are placing a 
tile on a square occupied by one of these 
creatures. All points are awarded at the end 
of the bonus round, at which time your 
tinier is reset. 




The Frustrator becomes progressively 
harder after eacH level. The computer starts 
to remove tiles and place skulls at a much 
faster pace, and during the bonus levels the 
creatures disappear much quicker. Also, 
the timer ticks away faster as each level 
progresses. 

Scoring is as follows: 

Plus sign — +5 x level of play 
Minus sign — -5 x level of play 
Skulls — 2 points at end of level 
T — 10 timer units (start with 50) 
Eyeball creatures — 5 points each 
Completing level — 10 x level of play 

Running the Game 

Note that a poke 65497, o is executed 
in Line to put the computer into the high- 
speed mode. Make sure the computer is in 
the normal-speed mode before accessing 
the disk or cassette in any way. To do this, 
type poke 65496, o and press ENTER. The 
listing is rather lengthy, so save several 
copies while entering it. 

Table 1 is a list of the most important 
variables used in the program. I have pro- 
vided this so people who like to experiment 
will have an easier time doing so. 



The graphics in The Frustrator are rela- 
tively simple to create. All objects, includ- 
ing the tiles themselves, were saved using 
hget commands so they can quickly and 
easily be placed on the screen (using hput). 
Table 2 contains a list of the various objects 
and their corresponding hget/hput buffer 
numbers. For further information on the 
use of these commands, please refer to the 
CoCo 3 Extended BASIC manual. 

A simple technique was used to create 
the flashing effect of the skulls. The back- 
ground color behind the skulls is the color 
contained in Palette Register 6. By simply 
placing a random number into Palette 6 
every few seconds, the program makes the 
background appear to flash. For a simple 
demonstration of this effect, enter this short 
listing: 

5 CMP: ON BRK GOTO 50 

10 HSCREEN : HCLS 8 : HCOLOR 6 

20 HLINE(10,10)-(9O, 90) ,PSET,BF 

30 PALETTE 6, RND(63) 

40 GOTO 30 

50 CMP:HSCREEN0:WIDTH32:END 



Table 2: HGET/HPUT buffer 




numbers 




I. Blank #1 




2. Plus sign 




3. Minus sign 




4. Blank #2 




5. Player's X marker 




fi. Blank #3 




7. Y marker 




8. Skull 




9, Big T 




10. Blank #4 




II. Blank #5 




12. Eyebal creature 




13. Unused 




14. Redtile 




15, Violet rile 




16. Big •?' 




17. Blank tile 





Note to RGB users: The listing pre- 
sented here is for CoCo owners who are 
using a television set or composite monitor 
as a display. If you are using an RGB moni- 
tor, enter the listing as it appears and make 
the following changes: 

770 DATA 18,54,9,36,63,27,45,38, 

0,57,7,5,47,8,4,23 

780 DATA 9,54,9,54,47,5,56,63,1, 

8,54,9,53,54,58,18,63, 9 

Q 





CoCo 3 ^ 






mmm' so 68 








\A 120 54 






■ 


200 3 








310 147 








390 85 








480 223 








590 226 








640 162 








700 197 








750 35 








800 136 








890 194 








970 44 








1060 73 








1100 177 








1160 196 








1200 53 








1260 191 








1320 138 








END 183 






The listing: frustrat 




CLEAR1500:FORI=0TO15:PALETTEI, 




: NEXTI : HBUFF1 , 310 : HBUFF2 , 310 : HB 




UFF3,310:HBUFF4,420:HBUFF5,420:P 




OKE65497,0:TIMER=RND(1000) :DIMLN 




$(99),C0(15),C1(22),C2(22) 




1 'COPYRIGHT 1989, FALSOFT INC. 




10 HBUFF6,100:HBUFF7,100:HBUFF8, 




576 : HBUFF9 , 270 : HBUFF10, 270 : HBUFF 





aQCI FTHTNf T N F H 



ii 



IIITH "C0MICS+" YOU CftH CREATE YOilRi 

OUN COMIC STRIPS! THIS STRIP IS AN 

ACTUAL EXAMPLE OF WHAT CAN BE DONE 

IIITH "C0HICS+". IT'S VERY EASY AND 

A WHOLE LOT OF FUN TO USE f /' 




n 









ffa 





"C0I1ICS+" IS ICON 
0PIUEH 2: HAS PULL- 
DOWN MENUS. IT EUEN 
INCLUDES A CLIP ART 
OPTION THAT LETS YOU 
USE PRE-DRfWN FACES, 
SPkFEATURES hands, etc. 
' y''the figures iii this 
strip mere all created 

using clip art. 
"c0mics+" is a hy8rid 
basic/ml program. it 
requires s4k' disk dr, 
self-centering joystk 

S DMP lOS OR DMP 106. 






CHEER UP! YOU CAN GET "C0MICS+" 

FOR ONLY $2 1.45 PLUS $1.50 S/H FROM 

lE.Z.FRIENDLY SOFTWARE, 118 CORLIES AUe|] 

POUGHKEEPSIE, NY 12601. YOUR ORDER 

MILL BE SHIPPED WITHIN 24 HOURS OF 

THE TIME IT IS RECEIVED! 



HkTh'n copy is Va size of original ? COM ICS+" options include: drau;, shade, paint, lines, boxes, circles, 
Magnify, move, erast,te%t, undo,save, toad, dir, print ,01'ip art. E.Z.Friendly t*W) 4Z5-8/5D. 
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11,928:HBUFF12, 928 :HBUFF13, 576 :H 
BUFF14 , 576 : HB0FF15, 576 : HBUFF16, 1 
80:HBUFF17, 680 
20 ON BRK GOTO1350 
30 PLAY"03V31L255T255" :HSCREEN2: 
GOSUB930 

40 HCOLOR0:HLINE(28, 1)- (298, 21) , 
PSET,B:HLINE(34,5)-(292,17) , PSET 
,B:HPAINT(30,2) ,15,0 
50 GOSUB1140 
60 SC=0 : TM=50 : RN=1 
70 GOSUB800:GOSUB1280 
80 HCOLOR1:FORX=27TO260STEP34:HL 
INE (X+2 , 37 ) - (X+32 , 37 ) , PSET : HLINE 
(X,38) - (X+30, 38) , PSET: NEXT :FORY= 
40TO176STEP20: HLINE (265, Y-l) - (26 
5, Y+16) ,PSET:HLINE(266, Y-2) - (266 
,Y+14) ,PSET:HLINE(264,Y)-(264, Y+ 
17) , PSET: NEXT 
90 X=40:Y=50:GOSOB7 60 
100 HCOLOR4 : HPRINT (5,1), "SCORE : " 
:GOSUB460:HPRINT(17,1) , "TIMER:": 
GOSUB1220 

110 HCOLOR5:PLAY"V31":HLINE(5,18 
4) -(150, 192) , PRESET, BF:IFBOOlTH 
ENHPRINT(3,24) , "LEVEL" : HPRINT (9, 
24) ,LN$(RN) :PALETTE5,C0(5) ELSEH 
PRINT (3, 24) , "BONUS ROUND" :PALETT 
E5, C0(5) : PLAY"03DFDFDFDFFDFDFDFD 
FDFDF" 

120 PALETTE6, RND (30) -1 : J0=JOYSTK 
(0) : Jl=JOYSTK(l) :IFZT>=ZP THEN48 
0ELSEIFBO=0ANDTM<10THENPALETTE7 , 


130 IFBO=0ANDTM<10THENPALETTE7,0 
140 XX=X:YY=Y:IFJ0<15THENM=1:X=X 
-34ELSEIFJ0>48THENM=1 :X=X+34 
150 IFJK15THENMM=2:Y=Y-20ELSEIF 
J1>48THENMM=2 : Y=Y+20 
160 IFX<40THENX=40ELSEIFX>244THE 
NX=244 

170 IFY<50THENY=50ELSEIFY>170THE 
NY=170 

180 IFM=1THENHPUT(XX-12,25)- (XX+ 
16, 36) , 4,PSET:M=0 

190 IFMM=2THENHPUT(270, YY-10) - (2 
78,YY+7),6,PSET:MM=0 
200 HPUT(X-12,25)-(X+16,36) ,5, PS 
ET:HPUT(270,Y-10)-(278,Y+7),7,PS 
ET : IFBO=0ANDTM<10THENPALETTE7 , 38 
210 IFBO=1THEN710ELSET1=T1+1:IFT 
1>15-TV THENT1=0:GOSUB470 
220 IFBO=1THENGOSUB660:GOTO240 
230 IFRN>13THENGOSUB530ELSEIFRND 
(14-RN) =1THENGOSUB530 
240 IFVA=2THEN250ELSEBT=0 
250 IFVA=3THENGOSUB290ELSEIFBUTT 
ON (0) =1THENGOSUB290ELSEBT=0 
260 IFG1>0THENG1=G1+1 : IFG1>50THE 
NGOSUB620 

270 I$=INKEY$:IFI$="R"THEN1340 
280 GOTO120 

290 IFBT=1THENRETURNELSEBT=1 : Xl= 
X-16:Yl=Y:P=HPOINT(X, Y) 
300 IFBO=1THEN700ELSEIFGK1THEN3 
10ELSEIF((X1-1)=(X2-10) AND (Yl- 
10)=(Y2-4)) THEN380 
310 IFP=2THENHCOLOR12 ELSEIFP=12 
THENHCOLOR3 

320 IFP=3THEN360ELSEIFP=10THEN37 


330 IFRN<4THENHCOLOR3 
340 ZT=ZT+1 : IFRN<4 ORP=12THENHPU 
T (XI , Yl-10) - (Xl+33 , Yl+10) , 14 , PSE 
T ELSEHPUT(X1, Yl-9) - (Xl+32, Yl+9) 
,15, PSET 
350 PLAY"02D03C" 



360 RETURN 

370 PLAY"01" :FORV=30TOlSTEP-3 :PL 
AY"V"+STR$ (V) +"AEC" : PALETTE8 , RND 
(63) :NEXTV:GOTO1340 
380 IFG5=1THEN430ELSEIFG4=1THENP 
LAY"03CDEFGAB04CD" :SC=SC+(5*RN) : 
GOSUB4 60 :GOSUB620: RETURN ELSEIFG 
3=1THEN410 ELSEIFG2=1THEN390IFG2 
=1THEN390ELSEIFG3=1THEN410 
390 G2=0:SC=SC-(5*RN) :PLAY"04DCO 
3BAGFEDC" : IFSC<0THENSC=0 
400 GOSUB4 60 :GOSUB620: RETURN 
410 T=TM:TM=TM+10:IFTM>50THENTM= 
50 

420 HCOLOR7:FORI=185+(T*2) T0185 
+ (TM*2) : HLINE (I, 9) -(1, 14) ,PSET:P 
LAY"04A01C" : NEXT :GOSUB620: RETURN 
430 PLAY"O4CDEFGFEDC":GOSUB620 
440 I=RND(3) :IFI=VA THEN440ELSEV 
A=I 

450 RETURN 

460 HCOLOR4,8:HLINE(88,8)-(120, 1 
6) , PRESET , BF : HPRINT ( 10, 1 ) , SC : RET 
URN 

470 T=185+TM*2: HLINE (T, 9) - (T, 14) 
, PRESET : PLAY"02F" : TM=TM-1 : IFTM>0 
THENRETURNELSEPLAY"04 " : F0RI=1T01 
8:PLAY"CE":PALETTE7,RND(63) :NEXT 
I : IFBO=1THEN730ELSEGOTO1340 
4 80 IFBO=1THENBO=0 : GOTO500ELSEIF 
RN/3<>INT(RN/3) THEN500 
4 90 BO=l 

500 FORI=30TO5STEP-2:PALETTE3, 63 
:PLAY"V"+STR$(I)+"04GFED":PALETT 
E3 , 7 : PLAY"05CFEFE" : NEXTI : RN=RN+1 
:SC=SC+(RN*10)+<SK*2) :GOSUB4 60 
510 GOSUB1140:GOSUB410:IFBO=1THE 
NXE=161 : YE=81 : HGET (XE, YE) - (XE+29 
,YE+18),11 

520 G1=0:G2=0:G3=0:G4=0:GOTO110 
530 X1=6+RND(7)*34:Y1=21+RND(7)* 
20:P=HPOINT (XI, Yl) : IFRND (ABS (15- 
RN) ) =1THEN640 

540 IFP=12THENHCOLOR2 ELSEIFP=3T 
HENHCOLOR12 ELSEIFP=2THEN580ELSE 
RETURN 

550 IFRN<4THENHCOLOR2 
560 ZT=ZT-1 : IFRN<40RP=12THENHPUT 
(Xl-16, Y1-1)-(X1+17,Y1+19) ,17, PS 
ET ELSEHPUT(X1-15,Y1)-(X1+17,Y1+ 
18), 15, PSET 

570 PLAY"02FEF01EFF" : RETURN 
580 IFG1>0THEN620ELSEG1=1 
590 X2=X1-7:Y2=Y1+3:IFRND(3)=1TH 
ENG2=1 : HPUT (X2 , Y2 ) - (X2+22 , Y2+12 ) 
, 3 : RETURN 

600 IFRND ( 2) =1THENG5=1:G2=0: HPUT 
(X2, Y2-2) - (X2+12, Y2+13) , 16, PSET : 
RETURN 

610 IFRND (4 )=1THENG3=1:G2=0: HPUT 
(X2, Y2-2)-(X2+18,Y2+13) ,9,PSET:R 
ETURN ELSEHPUT(X2, Y2)-(X2+22, Y2+ 
12) , 2,PSET:G4=1 : RETURN 
620 G4=0:G2=0:G1=0:HPUT(X2, Y2)-( 
X2+22 , Y2+12 ) , 1 , PSET : IFG301ANDG5 
OITHENRETURNELSEHPUT (X2, Y2-2) - ( 
X2+18 , Y2+13) , 10, PSET : G3=0 : G5=0 : R 
ETURN 
630 RETURN 

640 IFP=6THENRETURNELSESK=SK+1 : X 
1=X1-16 : HPUT (XI, Yl) - (Xl+31, Yl+18 
) , 8, PSET : PLAY"01DEF02DEF01CDE" : I 
FP=3THENRETURNELSEZT=ZT+1 : IFRN>3 
ANDP=2THENZT=ZT+1 
650 RETURN 

660 T9=T9+1:IFT9<16-RN THENRETUR 
N 



670 HPUT (XE, YE)- (XE+29, YE+18), 11 

,PSET 

680 XE=RND(7)*34:YE=RND(7)*20:XE 

=XE-9 : YE=YE+21 : HGET (XE, YE) - (XE+2 

9, YE+18) , 11: HPUT (XE, YE)- (XE+29, Y 

E+18) , 12,PSET:PLAY"02EA01A" :T9=0 

690 RETURN 

700 IFP013THENRETURNELSEHPUT (XE 

, YE) -(XE+29, YE+18) , 11, PSET : SE=SE 

+l:D$="O5CDEFG":FORV=30TO5STEP-8 

:PLAY"V"+STR$ (V) +D$ :NEXTV:PLAY"V 

31":GOTO680 

710 T1=T1+1 : IFT1>2THENT1=0 : GOSUB 

470 

720 GOTO220 

730 SC=SC+5*SE:GOSUB460:SE=0:FOR 

I=1T04 :PLAY"0"+STR$ (I) +"CDEFGAB" 

: NEXTI 

740 PALETTE7,38:BO=2:HPUT(XE, YE) 

-(XE+29, YE+18) ,11:T=TM:TM=50:GOS 

UB4 20 : GOSUB1 140 : GOT01 10 

750 'SET UP PALETTE 

760 PALETTE5, 60:FORI=0TO15:READC 

0(1): PALETTEI , C0 ( I ) : NEXT : FORI=0T 

08:READC2(I) ,C1(I) :NEXT:F0RI=1T0 

25:READLN$(I) :NEXT :FORI=26T099 :L 

N$(I)=STR$(I) :NEXT:RETURN 

770 DATA 18,36,11,7,63,48,9,38,0 

,32,16,9,25,13,4,47 

780 DATA 11,36,11,36,41,9,32,63, 

17,36,36,11,20,36,49,17, 63,11 

790 DATA ONE, TWO, THREE, FOUR, FIVE 

, SIX, SEVEN, EIGHT, NINE, TEN, ELEVEN 

, TWELVE, THIRTEEN, FOURTEEN, FIFTEE 

N, SIXTEEN, SEVENTEEN, EIGHTEEN, NIN 

ETEEN, TWENTY, TWENTY-ONE, TWENTY-T 

WO, TWENTY-THREE, TWENTY-FOUR, TWEN 

TY-FIVE, 26, 27, 28, 29, 30, 31, 32, 33, 

34,35 

800 HGET (33, 44) -(55, 56) ,1:D1$="R 

2U2R2D2R2D2L2D2L2U2L2U2 

810 HCOLOR12:HDRAW"BM33,48;S9;XD 

1$;":HPAINT(38,49) ,11, 12 

820 HGET(33,44)-(55,56),2:HPUT(3 

3,44)-(55,56) , 1,PSET 

830 D2$="R6D2L6U2" : HCOL0R3 : HDRAW 

"BM33, 48; S9,XD2$; " :HPAINT (35, 50) 

,14,3 

840 HGET (33, 44) -(55, 56) ,3 

850 HPUT (33, 44) -(55, 56), 1, PSET 

860 HGET (28, 28) -(56, 39) ,4:HCOLOR 

9, 8 :D3$="R4G2H2" :HDRAW"BM28, 28;S 

20;XD3$;":HPAINT(40,30) ,10,9 

870 HGET (28, 28) -(56, 39) ,5:HPUT(2 

8,28)-(56,39),4,PSET 

880 HGET(267,61)-(275,78),6:D4$= 

"BR2D4H2E2":HDRAW"BM267, 61;S18;X 

D4$; " :HPAINT (275, 74) , 10, 9 

890 HGET (267, 61) -(275, 78) ,7 :HLIN 

E(267, 60) -(278, 79) , PRESET, BF 

900 HGET (30, 43) -(48, 58) ,10:HCOLO 

R4 :D5$="R6D2L2D3L2U3L2U2" :HDRAW" 

BM30, 43;S12;XD5$;":HPAINT(34,45) 

,0,4 

910 HGET (30, 43) -(48, 58) , 9:HPUT(3 

0,43) -(48, 58), 10, PSET 

920 RETURN 

930 HCLS6:HCOLOR9:HCIRCLE(128,96 

) ,9, , -8:HPAINT(128,96) ,5,9 

940 HLINE (125, 100) -(131, 104) , PSE 

T,B 

950 HCOLOR10:HCIRCLE(125,97) ,3, , 

.9:HCIRCLE(131,97),3, , .9:HPAINT( 

125, 97) ,8, 10:HPAINT(131, 97) ,8,10 

960 HLINE (128, 100) -(129, 101), PSE 

T,B 

970 HGET(112,88)-(143,106) , 8 : HCL 



74 



THE RAINBOW January 1990 



S8 

980 HCOLORl:HCLS8:HGET(113,88)-( 

142,106) ,11 

990 HCOLOR10:HCIRCLE(128, 96) , 9 

1000 HCIRCLE(128,100),9, ,1, .50,0 

1010 HPAINT(128, 100) ,4,10:HPAINT 

(128, 91), 9, 10 

1020 HCIRCLE(128,95),4,13,1.2:HP 

AINT(128, 95) , 13, 13:HSET(129, 93, 8 

) :HSET(131,93,8) :HSET (130, 93, 4) 

1030 HCOLOR3:HLINE(122,99)-(114, 

104) , PSET : HLINE (123, 101) - (115, 10 

6) ,PSET:HLINE(124,103)-(116,109) 

,PSET 

1040 HLINE(134,99)-(142,104),PSE 

T:HLINE(133,101)-(141,106) , PSET : 

HLINE (132, 103) -(140, 108) ,PSET 

1050 HGET(113,88)-(142,106),12:H 

CLS8 

1060 HCOLOR3:HLINE(24,41)-(58,59 

) , PSET , BF : F0RI=4 3T05 9STEP2 : HSET ( 

26,1,8) :NEXTI:FORI=46T059STEP2:H 

SET (28, I, 8) :NEXTI:FORI=4 9T059STE 

P2: HSET (30, 1,8) :NEXT:FORI=51T059 

STEP2:HSET(32, I, 8) :NEXT:FORI=54T 

059STEP2:HSET(34,I, 8) :NEXT 

1070 FORI=54T059STEP2:HSET(36,I, 

8) : NEXT: HSET (38, 57, 8) :HSET(38,59 
,8) :HSET(40,59, 8) 

1080 HCOLORl:HLlNE(23,40)-(57,60 
) ,PSET,B:HGET(24,40)-(57, 60) , 14 
1090 HCOLOR12:HLINE(24,41)-(58,5 

9) , PSET, BF:HCOLORl : HLINE (23, 40) - 
(57 , 60) , PSET, B : HGET (24 , 41) - (56, 5 
9), 15 



1100 HCLS2 :DS="U1E1R1F1D1G2D1BD1 

Dl" :HCOLOR6:FORI=128T0132 :HDRAW" 

BM"+STR$(I)+", 96;S8;XD$;":NEXTI: 

HDRAWBM132 , 96 ; C8 ; XD$ ; " : HGET (126 

,91) -(138, 106), 16 

1110 HCLS2:HCOLOR1:HLINE(23,40)- 

(57,60) ,PSET,B: : HGET (24 , 40) - (57, 

60) , 17 

1120 HCLS8 

1130 RETURN 

1140 F0RI=1T03: PALETTEI, 0: NEXTI: 

FORI=8T014 : PALETTEI , : NEXTI : PALE 

TTE5, : PALETTE6, : R=RN : TV=R: 11=0 

: HC0L0R2 , 8 : SK=0 : ZT=0 : IFRN<4THENZ 

P=4 9ELSEZP=98 : IFTV>10THENTV=10 

1150 IFR>8THENR=R-8:GOTO1150 

1160 IFBO=2THENBO=0:GOTO1180ELSE 

FORIX=23TO250STEP34 : FORIY=40TO17 

0STEP20: HPUT (IX+1 , IY) - (IX+33, IY+ 

20) , 17,PSET:NEXTIY, 1X1170 

HCOL0R1: HLINE (23, 40) -(23, 18 

0) , PSET: HGET (24, 41) -(56, 59) ,13 

1180 A$="FRUSTRATOR" :A=36: IFBO=l 

THENPALETTE1, 23:PALETTE2, 7ELSEPA 

LETTE1 , CI (R) : PALETTE2 , C2 (R) 

1190 HCOLOR4:L=LEN(A$) :FORI=lTOL 

:HPRINT(A, 1*2+2) , MID$ (A$,I, 1) :NE 

XT 

1200 PALETTE3,C0(3) : PALETTE4 , C0 ( 

4) :FORI=6TO14:PALETTEI,C0(I) :NEX 

T 

1210 RETURN 

1220 I$=INKEY$:PLAY"V5" :HCOLOR9: 

HLINE (0,184) -(150, 192) , PRESET, BF 

:HPRINT(3, 24) , "SELECT DIFFICULTY 



LEVEL (1-9) ":VA=1 
1230 GOSUB1320:I$=INKEY$:IFI$="V 
"THEN1290ELSEV=VAL(I$) :GOSUB1330 
: IFV<1ORV>9THEN1230ELSERN=V:R=RN 
1240 IFR>8THENR=R-8:GOTO1240 
1250 TV=RN:PLAY"V31" : PALETTEI, CI 
(R) :PALETTE2,C2(R) : HCOLOR4 , 8:HLI 
NE (0,184) -(284, 192) , PRESET, BF 
1260 IFRN<4THENZP=4 9ELSEZP=98 
1270 RETURN 

1280 HCOLOR7:FORI=185T0185+(TM*2 
) : HLINE (I, 9) -(1, 14) , PSET : NEXT : RE 
TURN 

1290 WIDTH32:PALETTE12, 63: PRINTS 
136, "SELECT VARIATION: " -.PRINTS 19 
8,"(1) SINGLE TOUCH" :PRINT@230, " 
(2) RELEASE AND PRESS" :PRINT@262 
, " (3) CONTINUOUS" : 

1300 V=VAL(INKEYS) : IFV<10RV>3THE 
N1300 

1310 VA=V:POKESHE6C6,33:HSCREEN2 
:POKESHE6C6,141:PALETTE12,C0(12) 
:GOTO1230 

1320 FORI=5T03STEP-l :PLAY"0"+STR 
$(I) :FORII=12T01STEP-l:PLAYSTR5( 
II) : NEXTI I, I: RETURN 
1330 F0RI=1T03:PLAY"0"+STR$(I) :F 
0RII=1T012 :PLAYSTR$ (II) :NEXTII, I 
: RETURN 

1340 PALETTE8 , : SC=0 : TM=50 : GOSUB 
1220 : GOSUB4 60 : GOSUB1280 : GOTO510 
1350 POKE65496,0:HSCREEN0:CMP:EN 
D 

1360 PRINT@320,B:INPUTA:B=B+A:GO 
TO1360 



TAKE CONTROL OF YOUR OS9 I.vll COLOR COMPUTER 



S - 8CREEN CONTROL UTILITY - $19.95 + S&H 
Complete control of your text screen in only 510 
bytes. 34 built in mnemonic commands /jive simple 
command line control of your Bcreen. S giveB you 
control of screen size (80 or 40 column), fore- 
ground, background, and border color, montype, 
cursor position, blinking, reverse video, under- 
line, proportional and bold printing. Ring the 
bell, clear portions of the screen and echo to 
the screen all from the same command line. Merge 
S into your shell and forget display codes for- 






M - MENUING UTIIJTY - $ 1 9.95 + S&H 
Create complete menuing system for your OS9 LvII 
color computer. Smalt 100% MJj. program merges 
into your shell to give you a complete memory 
resident menuing system. M uses 1 simple to edit 
text file for each menu. Bach menu may contain up 
to 12 items, each items command line can be up to 
200 characters, and any valid command lino can bo 
processed. Each menu has independent user sel- 
ected colors and selection characters. Full para- 
meter passing to command line. MULTI-VUE not 
required. 

Pt - POINT AND SHOOT FILE SELECTION - $19.95 + S&H 

Add point and shoot file selection to any command 

line based program. Pt accepts a program name, 

displays current directory and allows you to use 

arrow keys to select file to process. Many built 

in utilities; del, copy, rename, list, dump, chd 

and chx from within PT. Coll your favorite editor 

from within PT. 

r3 Systems Consultants (602) 745-2327 

4072 E 22nd Suite #178 Please udd $3.00 for S&H 

Tucson, Ariz 85711 AZ residenta add 7% tax. 

Checks, Money Orders, or COD orders accepted. 



Great Christmas Gifts! 







/ T&D 880 Programs 
/ (88 Disks & Tapes) 
Only $235.00 

SEE PAGE 29 

f^/250 PICTURES^I 
Converted From The Macir 
/////// (30 Disks) 

'ipDnly $ 70.00 

^SEE PAGE 57 
•ear 



630 Public 

Domain Programs 

g (53 Disks Or Tapes 9 

Only $145.00 

SEE PAGE 91 

ea 




• • This Month Only ■ • 
Buy All 3 Sets For Only 
$ 350.00 And Save $1 00.00 



T&D SUBSCRIPTION SOFTWARE • 2490 Miles Slandish, Holland, Ml 49424 616-399-9548 
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The Mandelbrot Bug 
and the CoCo 3 Microscope 



by Jeremy and Marty Spiller 



You and your CoCo 3 can be- 
come explorers in a new and 
largely uncharted landscape 
discovered in 1979 by Benoit 
Mandelbrot, an American 
mathematician. The Mandelbrot set has 
become the symbol of a new science — ■ a 
science of chaos that has cut across all the 
scientific subdisciplines and revolution- 
ized them. This program. The Mandelbrot 
Bug and the CoCo 3 Microscope, lets your 
computer loose in Mandelbrot's world. 

Before I explain the how and why of the 
program, let me say that this is not a pro- 
gram for anyone looking for instant results. 
A screen can take from 12 hours to four 
days to complete, depending on the area 
you want to enlarge and the number of 
iterations you specify. You may. however, 
break construction whenever you need the 
machine for other purposes. The program 
provides an easy method for saving and 
reloading unfinished screens so they may 
be completed at a later time. Of course you 
can save completed screens as well. You 
can also build a screen on three or four 
successive nights while using the computer 
for other projects during the day. This 
program works only on the CoCo 3. 

Tape Versus Disk 

The program was originally written for 
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use with a disk drive. While the screens can 
be saved to tape, the sheer length of a screen 
save makes a disk drive more practical. 
Tape users need to make the following, 
modifications while keying in the program: 
Delete lines 200, 250 and 260'; change the " 
>4 in Line 210 to >3; change the SA-VEM in 
lines 1280 through 1310 to CSAVEM; and 
change the L0ADM in lines 1370 through 
1400toCL0ADM. 

• 
The Mandelbrot Bug 

The Mandelbrot bug is a mathematical 
monster that lives in a land called the complex 
plane. It exists in a two-dimensional world 
where it can comprehend only two direc- 
tions of movement. It can go up and down, 
or to the right or left. If it goes up or down, 
it is traveling in the direction of imaginary 
numbers. If it goes right or left, it is travel- 
ing in the direction of real numbers. Since 
you and I live in a three-dimensional world, 
we are privileged to look at it from a van- 
tage point that it could never imagine — 
from outside the TV screen. 

While its world is very different from 
ours, at least one thing is the same: We can 
view our world from faraway or from close 
up. The Mandlebrot bug can do the same 
with its world. If I look at my computer 
from far away, I can see the whole key- 
board, but I may be too far away to read the 
letters on it. If I move closer, say one foot 
away, I can see the keys clearly. If I get out 
a magnifying glass, I can see flaws and 
scratches in the plastic. 1 can use a micro- 
scope to see that the letters on the keys 
actually have irregular borders, and an 
electron microscope would show an irregu- 
lar universe of molecular mountains and 
valleys. Each lime we get closer, we are 
seeing the object on a different scale. The 



Mandelbrot bug's world is infinite in both 
area and scale. We can examine to infinity 
in both real and imaginary directions, or we 
can zero in on one tiny area, magnifying 
areas within it again and again down to 
scales smaller than an electron. We can do 
this because the bug lives in a mathemati- 
cal world, and we have our CoCo 3's, 
which can be programmed to act like micro- 
scopes. When we use CoCo 3 Microscope, 
we find infinitesimal Mandelbrot bugs, 
fingers of fire, oceans of color, microscopic 
seahorse tails, intricate filigree and geo- 
metric designs. You can spend all of eter- 
nity exploring a tiny area of Mandelbrot's 
complex plane and never see exactly the 
same thing twice! 

How to Run It 

The program allows you to explore a 
box that measures four inches square, cen- 
tered on zero in both real and imaginary 
axes. At first glance this may sound limit- 
ing, considering that the complex plane is 
infinite in area. However, since any part of 
the box can be examined in microscopic 
detail, even a lifetime would not be enough 
to completely explore it. For those intrepid 
enough to explore beyond these ranges, 
you can modify Line 5 10 to create another 
4-by-4 box some place in the complex 
plane. The main menu allows several op- 
tions, including running a directory for the 
disk in Drive 0, without breaking the pro- 
gram. Tape users should delete all refer- 
ences to Disk BASrc as described above. 
The main menu also allows you to load a 
previously saved picture or begin a new 
picture from scratch. Press 2 at the startup 
menu and you are prompted for coordinates 
and number of iterations. I recommend 
starting with the following numbers as this 
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is the most interesting part of the 4-by-4 
box the program was built to explore. 

Real axis low range 2 (minus 2) 

Real axis high range — +0.6 

Imaginary axis low range 1 (minus 1) 

Imaginary axis high range — +1 
Iterations — 60 

When prompted for a filename, choose 
one with seven or fewer letters. The pro- 
gram saves a screen as four separate fi les. A 
number is added to the filename on each of 
the four files so the program can load them 
back into the computer in correct order. 
Each screen save takes up 16 granules of 
disk space. 

There are many bugs scattered through- 
out other parts of the complex plane. 
However, this one is probably the biggest, 
and it happens to be conveniently close to 
zero in both axes. This saves on significant 
figures (you'll find out why this is impor- 
tant later). While everyone should start 
with these coordinates for his or her first 
picture, the program makes it easy to choose 
the numbers to use for all succeeding en- 
largements. The program is self-prompt- 
ing: simply enter all five numbers when the 
program asks for them. After you enter the 
number of iterations, the screen should 
clear, and you will begin to see pixels being 
set in the lower left corner. It should take 
about twelve hours to complete the first 
screen and then you will meet your first 
Mandelbrot bug. 

Colors and the Number of Iterations 

For all enlargements that follow your 
first screen, as well as for screens in which 
you expect no very large areas of black, you 
should use at least 100 iterations (prefera- 
bly 300). The computer must test each 
pixel on the screen to see if it is a member 
of the set. This test must be carried out 
several times. The more times (iterations) 
you test the point, the more confidence you 
have that the point is, or is not . a member of 
the set. It should be noted here that all 
points that prove to be members of the set 
appear on the screen in black. The colored 
points are not actually members. The col- 
ors chosen for points that are not members 
of the set depend on how close they are to 
being included in the set. It turns out that 
the most interesting parts of the Mandle- 
brot set lie close to the boundaries, just 
outside of it. 

The main disadvantage of using a lot of 
iterations is the amount of time it takes to 
complete a screen. As you enlarge closer 
and closer to a boundary, the program must 
spend more and more time iterating the 
testing loop before it breaks out and sets a 
point. This is especially true if your new 



enlargement contains large areas that were 
set in black on the preceding enlargement. 
Some enlargements may take three or four 
days to complete. On the other hand, if the 
number of iterations is set too low, areas 
that should be in color will be black; areas 
thai should be black will not show their true 
shape. 

Choosing Your Next Enlargement 

Once a screen is complete, a flashing 
cursor appears at the bottom left. The cur- 
sor may be moved to any point on the 
screen using the arrow keys. Shifted arrow 
keys produce faster movement. Place the 
cursor directly over the area you want to 
enlarge and press a number key ( 1 through 
6). A box appears on the screen around the 
spot where the cursor was located. While 
the program is in the box mode, the cursor 
disappears. Higher-number keys produce 
larger boxes. 

If you chose the wrong size box, try a 
different number key. This erases the origi- 
nal box and replaces it with another. Press- 
ing any key other than the appropriate 
number keys erases the box and returns the 
cursor. When you have boxed the exact 
area you want to enlarge, press enter. 
Note: Don't enlarge areas that are all black 
(inside a bug) because you will get nothing 
but a totally black screen. It is OK to 
include some areas that you know will be 
black, but be aware that large areas of black 
slow down construction considerably. The 
areas you should be most interested in 
enlarging are located in the confetti sur- 
rounding the bug. 

The Secondary Menu 

Pressing ENTER from the graphics screen 
or BREAK from any point in the program 
brings you to the secondary menu. Here 
you see the exact coordinates for enlarging 
the area within the box you chose. You 
should copy these numbers down for future 
reference in case you ever need to recon- 
struct the same screen from scratch. (Note 
that the box has already been removed from 
the screen at this poi nt so the screen has not 
been damaged.) You may begin construc- 
tion of the new enlargement using these 
coordinates by choosing Option I. It is 
best, however, to save the screen in mem- 
ory first since using Option 1 clears the 
graphics in memory. 

Saving a Screen 

You may save the screen you have just 
completed to disk (or tape, for those with 
very good tape recorders and brand-new 
tapes) by choosing Option 3. Saving a 
screen does not affect the parameters you 
found using the box function. The screen is 
saved as four files using the filename you 



entered when you first ran the program. 
When you save a screen, the program en- 
codes seven variables into the data (real 
and imaginary ranges, the number of itera- 
tions and two variables to make it possible 
to complete a screen saved in a partially 
completed state). When you reload, the 
program automatically knows the original 
parameters used to draw the picture and 
returns accurate enlargement parameters 
using the box function. Make multiple saves 
and save a screen several times during 
construction to avoid having to rebuild the 
entire thing from scratch in case of a power 
failure. 

Running Your Next Enlargement 

Before running your next enlargement, 
give it a new filename (seven letters or 
less), and possibly change the number of 
iterations. These options are automatic 
wheneveryou choose 1 from the secondary 
menu. Answer the prompts and the com- 
puter begins your next enlargement using 
the parameters that you found earlier with 
the box routine. 

Saving and Restarting an Incomplete 
Picture 

If you need the computer for other pur- 
poses while it is working on a screen, just 
press the break key. This returns you to 
the secondary menu. Simply save the in- 
complete screen using Option 3 as you 
would for a completed picture. You may 
shut the computer down or use it for any- 
thing else by typing NEW. When you want to 
restart the picture, load and run the main 
program and reload the screen using Op- 
tion 2 from the main menu. Once reloaded, 
go to the secondary menu by pressing en- 
ter and choose Option 5. This restarts con- 
struction. It's that simple! 

The Mandelbrot Set 

The Mandelbrot set represents a very 
important event in the study of natural 
phenomena — the birth of the science of 
chaos. Why would anyone want to study 
chaos? The answer is that we live in a 
chaotic world, and this chaos frequently 
produces the most complex and interesting 
phenomena in nature. How can a relatively 
few genes produce the infinite complexity 
of the neuronal connections in the human 
brain? How do these connections produce 
thought and behavior? How does a huge 
mass of quarks and leptons with weird 
properties produce matter with familiar 
properties? Why are the very best computer 
models unable to predict the weather for 
more than three days in advance? Until the 
birth of the science of chaos, scientists had 
gone about as far as they could go in an- 
swering these questions. Phenomena of 
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this nature is difficult to break down into 
pieces small enough for analytical science 
to digest. Experiments designed to investi- 
gate questions like these tended to be very 
dependent on tiny variations in starting 
conditions, and the data they produced 
tended to be chaotic and impossible to 
interpret. 

Benoit Mandelbrot, however, had a head 
for shapes. Whenever he was confronted 
by a problem, he looked for patterns he 
couldrelate to geometric forms. He discov- 
ered he could analyze data that made abso- 
lutely no sense to anyone else by looking 
for obscure patterns and then finding ways 
of making these patterns apparent to other 
people. The trick was to find a way of 
making the patterns apparent. 

In the mid '60s the age of the computer 
was just dawning, and Mandelbrot had 
access to the computers at the IBM re- 
search laboratory. He discovered that by 
choosing unusual coordinates, he could 
often make his computer use chaotic data to 
draw out the shapes in his mind. To his own 
amazement when he looked closely at the 
computer patterns, he discovered there was 
a lot of detail he had not noticed before. 
There were smaller patterns within the larger 
patterns, and there were even smaller pat- 
terns within these. 

Fractals 

Mandlebrot coined the term fractal to 
describe this pattern-wifhin-a-pattem solu- 
tion to chaotic mathematical and physical 
systems. In general his first solutions tended 
to be pictures that looked the same at any 
scale. Picture a branch with little branches 
shooting out of it. Now picture the smaller 
branches with twigs coming from them. 
Then look at each twig and picture smaller 
twigs shooting off. Look at these tiny twigs 
and you see even tinier twigs . . . and so on 
to infinitely tiny branches. Fractal structure 
occurs freely in nature in the form of trees, 
blood vessels, snowflakes and mineral 
crystals, to name only a few. 

Cartesian Coordinates and the Complex 
Plane 

Most readers are familiar with Cartesian 
coordinate mapping. To set a pixel on your 
graphics screen, you must specify an.v and 
y coordinate. The x coordinate tells the 
computer how many bits or bytes to go to 
the right, and the y coordinate tells how 
many to go down the screen before plotting 
the pixel. Each axis can be assigned to 
represent a particular variable, quantity or 
quality. Thus, you can use data to chart the 
price of gold against an array of dates or 
wind resistance against velocity. Or you 
can use a mathematical formula to plot 
values of -V against the calculated values of 



y. You end up with a curve or a shape 
defined by the coordinates. Once you have 
defined the coordinates, the screen itself 
becomes what mathematicians call & phase 
space. One of the most interesting phase 
spaces (coordinate systems) in abstract 
mathematics involves plotting real num- 
bers against imaginary numbers. The phase 
space created when you plot real numbers 
against imaginary numbers is called the 
complex plane. 

Real numbers are what we deal with 
every day — positive numbers, negative 
numbers, integers and fractions. These are 
plotted on the horizontal axis — negative 
numbers on the left, positive numbers on 
the right, and of course zero in the middle. 
Imaginary numbers also come in positive, 
negative, integer and fraction. The differ- 
ence is that imaginary numbers represent 
the square root of negative numbers. What 
number multiplied by itself gives you -4? 
Nothing! No number multiplied by itself 
can return a negative number. That's how 
imaginary numbers got the name. They 
may be imaginary, but they fulfill several 
purposes in abstract mathematics. 

Any imaginary number can be repre- 
sented by a real number multiplied by the 
square root of -1 (which is, of course, an 
imaginary number). The square root of - 1 is 

generally represented ! 

by an italicized 
lowercase i. The ver- 
tical axis therefore 
looks much like the 
horizontal axis. Posi- 
tive imaginary num- 
bers go from zero up 
the y axis, and nega- 
tive ones go from zero 
down. Each number 
on the imaginary axis 
is simply a real num- 
ber followed by i. 

One additional 
complication to stand- 
ard Cartesian map- 
ping paves the way 
for the Mandelbrot 
set. Standard geome- 
try takes an equation 
and graphs the set of 
points that satisfies it. 
Once plotted in its 
phase space, the set 
usually takes on the 
shape of a line, a curve 
or the outline of a 
shape. Equations that 
produce more or less 
simple curves and 
shapes are called lin- 
ear junctions. Scien- 
tists like to find linear 



functions to describe nature because of 
their simplicity, and in general many natu- 
ral phenomena can be described in this 
fashion. 

An alternative method of drawing a linear 
curve is to have your computer examine 
each point in the phase space, plugging the 
.rand v values of the point into the equation 
to see if it balances (totals zero). If it does, 
that point is a member of the set. If you do 
it this way, you end up with the same curve 
you would get if you simply used the equa- 
tion to calculate the value of y against 
values of .v. At first glance this may seem a 
silly waste of time. Why bother checking 
out points on a trial-and-error basis if you 
can use the equation to calculate all the 
points that are members of the set? The 
reason is that most of the functions that 
describe chaotic behavior in the real world 
do not have linear solutions. In other words, 
these functions may produce thousands, 
even millions of values of y for any given 
value of x instead of the one or two you 
would expect from a linear function. 

An excellent example of a solution to a 
non-linear problem is BASIC'S PAINT com- 
mand. You specify a point to begin paint- 
ing and a border color to tell the computer 
where to stop painting, and an entire area of 
the phase space (defined by x and y coordi- 



* EXTENDED* 
ADOS-3 

• Built-in RAMdisk • Point-and-plck file select menu • 

Nol a new version ol ADOS-3. but a new product that shares space with ADOS-3 in 
a 16K EPROM. Arrow-key selection ot files to execute, LOAD. COPY. KILL or 
SCAN. The BACKUP command is doubled in speed (or lull disks, proportionately 
laster (or partly full disks. (BACKUPS to or from the RAMdisk typically take 5 to 20 
sec) • BACKUP-with-format • Wild-card COPY and KILL, with optional prompting 
for individual files • Date (or date/time with hardware clock) displayed for files in 
the directory, printed on LLISTings • DATES function • Key repeat • Block 
move/copy of BASIC program lines • Text screen printer dump • Auto-reboot ot a 
BASIC program or the DOS command • Parallel printing • Read/write/format 35/40 
tracks on BO-track drives • Supports 3 double-sided drives plus 2 RAMdrives • 
Allows different numbers of tracks on different drives • Shares the original's excel- 
lent compatibility with commercial software. For 128K CoCo 3 with ADOS-3 (RAM- 
disk use requires 512K). Includes information on having an EPROM burned (cost is 
S15) after configuring Extended ADOS-3, Disk, S39.95. Extended ADOS-3 plus 
ADOS-3. $64.95. Driver for Disto real-time clock, $5. Adapter for controllers lacking 
28-pin socket, $10. SmartWatch real-time clock (Tandy 25-1033 equiv.), $35 (Drivers 
for Ext. ADOS-3 and OS-9 included; usable in 28-pin socketed controllers or in 
Rompack, $10). 



"...will blow your socks off ... impossible fo give Extsndsd ADOS-3 
anything oth.r than a ravs review." _ RalnboWi octob.r igag. 

"Flawless, compatible opsratlon with Just about everything undor 
the sun. ..by far the most USEFUL product ever devised for the 
Color Computer." _ CoCo c „ pbo , rd| Sept/Oct igSB. 



ADOS-3 (reviewed July 1987) 

Customize default startup message, colors, screen width, baud rate, step rates, 
processor speed, number of tracks (35, 40, or 80). Disk I/O and printing are reliable at 
double CPU speed. Extra commands such as FAST, SLOW. AUTO. RUNM. SCAN, 
CAT, PRT ON/OFF. Keystroke macros, arrow-key scroll through BASIC programs, 
edit/repeat of last command, auto-edit of error line, ML monitor, lots more. Usable as 
a disk utility or In EPROM. 128K Coco 3. EPROM-burning (cost is S15-20) Informa- 
tion provided. Disk, $34.95. ADOS for CoCo 1 and 2 Disk, $27.95. 

FOR OS-9: SmartWatch real-time clock with driver, $30.00; in Rompack, $40.00. 

^ \ 11111 N. Kendall Dr. 

Suite A108 
Miami. FL 33176 
(305) 274-3B99 
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nates) becomes a solid color, basic does 
this by checking to the right and left of the 
start pixel and painting until it reaches a 
pixel set in the border color. Then it looks 
up and down and repeats the process over 
and over again until the area is painted. 
Instead of using a mathematical formula 
to decide which points to set. the computer 
uses an iterated process (repeated over and 
over again). The result is not a line or the 
outline of a shape, but an entire irregularly 
shaped area of set points. 

The CoCo Microscope 

The Mandelbrot set uses a simple for- 
mula to test each point in the complex 
plane. We are using the HSCREEN 2 graph- 
ics screen to show the results. The hori- 
zontal screen coordinates can specify any 
range of real numbers, and the vertical 
coordinates can specify any range of 
imaginary numbers. Real numbers might 
range from zero to 3 1 9 with 320 steps. The 
step rate here would be one whole number 
for each screen pixel. This would specify 
a very large scale, as though you were 
looking down upon a large landscape from 
an airplane. In order to keep distortion to 
a minimum, you would choose the same 
step rate (one pixel per whole number) for 
the vertical (imaginary) axis that would 
range from zero to 191. (Note: In order to 
avoid distortion, this program uses prede- 
fined boxes to determine enlargement 
parameters.) 



You could, however, use a much smaller 
scale, say from zero to one. Now instead of 
looking down from an airplane onto a 
huge piece of phase space, you are stand- 
ing on the ground looking at a much 
smaller area. Each pixel on the x axis now 
represents only 1/320 of a whole number. 
You can magnify a part of this screen as 
well. If you set the left side of the screen to 
represent 0.2 and the right side of the 
screen to represent 0.2005. then each of 
the 320 steps across the screen would 
represent a step rate of only .00000 1 56 per 
pixel. You can think of such a scale as 
looking at this part of the complex plane 
with a microscope. BASIC allows you to 
carry out this process to a limit of 12 
significant figures. In the above example. 
the second pixel would be numbered 
0.20000156. eight significant figures. BAS- 
IC cannot magnify any area with a step rate 
of less than .00000000000 1 . (It is true that 
BASIC can manage numbers smaller than 
this value using scientific notation, and 
scientific notation is essential to the cor- 
rect production of the figures found in the 
Mandelbrot set. However, BASIC cannot 
add mantissas unless their magnitudes 
coincide. ) In effect, your CoCo becomes a 
sort of mathematical microscope with a 
resolution of 1 x 10'". 

The Mandelbrot Set 

Mandelbrot invented the tenn fractal 
before he discovered the set that bears his 



CoCo 3 Disk : ECBMod. 




130. 32 

200 80 

260 ............ 42 

330 7 

500 141 

660 68 

760 133 

870.. 235 

980 204 

1110. 21 

1190.......... 63 

1330..... 42 

1460........ 246 

1540 252 

1700 218 

END ........ 218 



The Listing: MANDEL 



"COPYRIGHT 1989. FALS0FT INC. 
10 ***************************** 

20 '* THE MANDELBROT BUG * 

30 '* AND THE * 

40 '* C0C03 MICROSCOPE * 

50 '* BY MARTY & JEREMY * 



60 •* SPILLER * 

70 '* 1989 * 

30 ■ **************************** 

90 CLEAR 200.&H6000 
100 Y-O:X-0:FY-O:FX-0:Rl-0:R2-0: 
11=0: 12-0: ITER-0: 
110 ON BRK GOTO 1030 
120 HSCREEN2:HBUFF 1 ,600:HCOLOR0 
:HSCREEN0 

130 POKE &HE6C6.33: REM DISABLES 
AUTOMATIC HSCREEN CLEAR 
140 CLS:INPUT"ARE YOU USING AN R 
GB MONITOR (Y OR N)":RB$:IF R 
B$<>"Y" AND RB$<>"N" THEN 140 
150 -*******MAIN MENU********** 
160 CLS:PRINT"MANDELBR0rS BUG A 
ND THE COCO MICROSCOPE" 
170 PRINT:PRINT:PRINT"1. LOAD A 
PICTURE (COMPLETE OR INC0MPL 
ETE)" 

180 PRINT:PRINT"2. CREATE A PICTU 
RE FROM SCRATCH" 

190 PRINT:PRINT"3. GO TO SEC0NDA 
RY MENU (DON'T DO THIS UNLES 
S THERE IS A PICTURE IN ME 
M0RY" 

200 PRINT:PRINT"4. RUN A DIRECT0 
RY ON DRIVE (0)":REM TEAP USERS 



name. The Mandelbrot set is a fractal in 
the sense that it contains detail at succeed- 
ingly smaller scales, but it is not a fractal 
in the sense that the pictures it produces at 
different scales are self-similar. Even 
though many of the structures you see 
seem to be repeated over and over again, 
none of them are actually identical. This 
fact is what makes the set so interesting to 
examine. 

The formula that decides whether a 
point in phase space is a part of the set or 
not is a feedback loop that squares the real 
and imaginary coordinates, adds the origi- 
nal coordinates to the result, squares this 
new result, adds the original coordinates 
again, squares the result and so on for as 
many iterations (repetitions) as it takes to 
discover if the cumulative result remains 
within a finite range or heads off to infin- 
ity. If, after the specified number of itera- 
tions has taken place, the real and imagi- 
nary components of the result remain within 
an arbitrary range, (in our case, within the 
4-by-4 box), then the point is considered 
part of the set. While 1000 iterations is 
considered fairly safe, in theory one can 
never be absolutely sure a point is really a 
member of the set. no matter how many 
iterations of the loop you run. It may 
remain within bounds through a billion 
iterations, but who knows what it would 
do on the billion-and-first? There is no 
shortcut method of predicting;. 

□ 




DELETE THIS LINE 

210 INPUT A:IF A<1 OR A>4 THEN 2 

10: REM TAPE USERS CHANGE >4 TO > 

3 

220 IF A-l THEN INPUT"ENTER FILE 

NAME";F$:G0SUB 1740:GOTO 1340 

230 IF A-2 THEN G0SUB 270:GOTO36 



240 IF A-3 THEN GOTO 1030 

250 DIR:PRINT:PRINT"THERE ARE":: 

PRINT FREE(0);:PRINT"FREE GRANUL 

ES ON THIS DISK. IT TAKES 16 

TO SAVE A SCREEN":PRINT:REM TAP 
E USERS DELETE THIS LINE 
260 INPUT"<ENTER> TO GO BACK TO 
MENU":A:GOT0 150: REM TAPE USERS 
DELETE THIS LINE 

2 7 -*****ENTER PARAMETERS****** 
275 FY=0:FX-0 

280 CLS:INPUT"INPUT REAL NUMBER 
LOW END RANGE" ;R1 
290 INPUT"INPUT REAL NUMBER HIGH 

END RANGE" :R2 
300 INPUT"INPUT IMAGINARY NUMBER 

LOW END RANGE"; II 
310 INPUT"INPUT IMAGINARY NUMBER 

HIGH END RANGE"; 12 
320 INPUT-INPUT THE NUMBER OF IT 
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ERATIONS" : ITER 

330 INPUT"NAME OF FILE (7 LETTER 
S OR LESS)": F$ : I F LEN(F$)>7 THEN 

330 
340 RSTEP-(R2-Rl)/320 
350 ISTEP-C 12 - 1 1) /192 : RETURN 
360 GOSUB 1740:HSCREEN 2:HCLS 1: 
POKE65497.0 
370 IMAG-I1 

380 '****MA1N LOOP MANDELBROT AL 
GORITHM**** 

390 REM LINES 470 TO 520 HAVE BE 
EN COMPRESSED TO SPEED EXECUTION 
400 FOR Y-FY TO 191 
410 REAL-R1 
420 IMAG-U+Y*1STEP 
430 FOR X-FX TO 319 
440 REAL-R1+X*RSTEP 
450 ICOMP-0 
460 RCOMP-0 
470 FORIN-1TOIT 
480 RI-RC*RC-IC*IC+RE 
490 IC-RC*IC*2+IM 
500 RC-RI 

510 IFRC>20RRC<-20R1C>20RIC<-2TH 
EN540 

520 NEXTIN 
530 C-0:GOTO 550 
540 C-INT(SQR(255/ITER*INDX)) 
550 HSET(X.191-Y.C) 
560 NEXT X:FX-0:NEXT Y 
570 , *******CURSOR ROUTINE***** 
580 POKE 65496.0 
590 XC-20:YC-180 
600 HSCREEN2: GOSUB 1740 
610 Pl-HPOINT(XC.YC) 
620 P2-HPOINT(XC+l.YC) 
630 P3-HP0INT(XC.YC+1) 
640 P4-HP0INT(XC+1.YC+1) 
650 C-C+l : IF C>15 THEN C-0 
660 HSET(XC.YC.C):HSET(XC+1.YC.C 
):HSET(XC.YC+1.C):HSET(XC+1.YC+1 
,C):A$=INKEY$ 
670 HSET(XC.YC.Pl) 
680 HSET(XC+1.YC.P2) 
690 HSET(XC,YC+1.P3) 
700 HSETUC+1.YC+1.P4) 
710 IF A$<>"" THEN 730 
720 GOTO650 

730 IF A$-CHR$(94) THEN YC-YC-1: 
IF YC<12 THEN YC-12 
740 IF A$-CHR$(10)THEN YC-YC+1:I 
F YO180 THEN YC-180 
750 IF A$-CHR$(9)THEN XC-XC+1 : IF 

XO300 THEN XC-300 
760 IF A$-CHR$(8) THEN XC-XC-1:I 
F XC<20 THEN XC-20 
770 IF A$-CHR$(95)THEN YC-YC-10 
IF YC<12 THEN YC-12 
780 IF A$-CHR$(91)THEN YC-YC+10 
IF YO180 THEN YC-180 
790 IF A$-CHR$(93)THEN XC-XC+10 
IF XO300 THEN XC-300 
800 IF A$-CHR$(21)THEN XC-XC-10 
IF XC<20 THEN XC-20 
810 IF A$-CHR$(13) THEN 980 
820 A-VAL(A$):IF A>0 AND A<7 THE 
N 840 

830 GOTO 610 

8 40 •******* B0X ROUTINE******** 
850 HGET(XC-20.YC-12)-(XC+20.YC+ 
12). 1 

860 ON A GOSUB 890.900.910.920.8 
70.880:GOTO 930 



870 XL-XC-17:XH-XC+18:YH-YC-10:Y 

L-YC+11:RETURN 

880 XL-XC-20:XH-XC+20:YH-YC-12:Y 

L-YC+12: RETURN 

890 XL-XC-7:XH-XC+8:YH-YC-4:YL-Y 

C+5: RETURN 

900 XL-XC-10:XH-XC+10:YH-YC-6:YL 

-YC+6: RETURN 

910 XL-XC12:XH-XC+13:YH-YC-7:YL 

-YC+8: RETURN 

920 XL-XC15:XH-XC+15:YH-YC-9:YL 

-YC+9: RETURN 

930 HLINE(XL.YH)-(XH.YL).PSET.B 

940 A$-INKEY$:IF A$-""THEN 940 

950 HPUT(XC-20,YC-12)-(XC+20.YC+ 

12) .1 .PSET 

960 IF A$-CHR$(13)THEN 980 

970 A-VAL(AS):IF A>0 AND A<7 THE 

N 860 ELSE 610 

980 , *******CALCULATE RANGES FOR 

NEXT ENLARGEMENT******* 
990 XL-R1+XL*RSTEP 
1000 XH-R1+XH*RSTEP 
1010 YL-I1+(191-YL)*ISTEP 
1020 YH-I1+(191-YH)*ISTEP 
1030 '****SECONDARY MENU******* 
1040 FY-Y:FX-X-1:IF FX<0THEN FX- 


1045 POKE 65496.0 
1050 IF RB$-"Y" THEN PALETTE RGB 

ELSE PALETTE CMP 
1060 HSCREEN0:CLS:PRINT"YOU HAVE 

CHOSEN THE FOLLOWING ENLARGEM 
ENT PARAMETERS:" 

1070 PRINT"R1-":XL:" ITER-"; ITER 
1080 PRINT"R2-":XH 
1090 PRINT"I1-";YL 
1100 PRINT"12-":YH 
1110 PRINT:PRINT"1. BEGIN CONSTR 
UCTION OF NEW ENLARGEMENT" 
1120 PRINT"2. RETURN TO CURRENT 
SCREEN" 

1130 PRINT"3. SAVE SCREEN TO DIS 
K (TAPE)" 

1140 PRINT"4. MAIN MENU" 
1150 PRINT"5. CONTINUE THE PARTI 
ALLY COM- PLETED SCREEN IN M 
EMORY" 

1160 PRINT"6. RETURN TO BASIC" 
1170 INPUT A: IF A<1 OR A>6 THEN 

1170 
1180 ON A GOTO 1500.600.1190.150 
.1810.1830 

1190 •***** SAVE SCREEN TO DISK ( 
TAPE USERS CHANGE "SAVEM" TO "CS 
AVEM" )******* 

1200 P-VARPTR(R1):VA-&H67F00:GOS 
UB 1640 

1210 P-VARPTR(R2): GOSUB 1640 
1220 P-VARPTR(Il):GOSUB 1640 
1230 P-VARPTR(I2):GOSUB 1640 
1240 P-VARPTR(ITER):GOSUB 1640 
1250 P-VARPTR(Y):GOSUB 1640 
1260 P-VARPTR(X):GOSUB 1640 
1270 POKE 65496.0 
1280 POKE &HFFA3.&H30:A$-F$+"1" 
SAVEM A$.&H6000.&H7FFF,&HB44A 
1290 POKE &HFFA3.&H31:A$-F$+"2" 
SAVEM A$.&H6000.&H7FFF.&HB44A 
1300 POKE &HFFA3.&H32:A$-F$+"3" 
SAVEM A$,&H6000.&H7FFF.8HB44A 
1310 POKE &HFFA3.&H33:A$-F$+"4" 
SAVEM AS.&H6000.&H7FFF.&HB44A 
1320 POKE &HFFA3.&H3B 



1330 GOTO 1030 

1340 "*****LOAD SCREEN FROM DISK 
(TAPE USERS CHANGE "LOADM" TO " 
CLOADM" )***** 
1350 POKE 65496.0 
1360 HSCREEN2:HCLS 1 
1370 POKE &HFFA3.&H30:A$-F$+"1" 
LOADM A$ 

1380 POKE &HFFA3.&H31:A$-F$+"2" 
LOADM A$ 

1390 POKE &HFFA3.&H32:A$-F$+"3" 
LOADM A$ 

1400 POKE &HFFA3.&H33:A$-F$+"4" 
LOADM A$ 

1410 POKE &HFFA3.&H3B 
1420 P-VARPTR(R1):VA-&H67F00:GOS 
UB 1690 

1430 P-VARPTR(R2):GOSUB 1690 
1440 P-VARPTR(Il):GOSUB 1690 
1450 P-VARPTR(I2):G0SUB 1690 
1460 P-VARPTR(ITER):GOSUB 1690 
1470 P-VARPTR(Y):GOSUB 1690 
1480 P-VARPTR(X):GOSUB 1690 
1490 GOSUB 340:GOTO 570 
1500 , ****CHANGE PARAMETERS FOR 
NEW ENLARGEMENT******* 
1510 CLS:INPUT"INPUT FILENAME FO 
R NEW ENLARGE- MENT (7 LETTERS 
R LESS)";TEMP$:1F LEN(TEMP$)>7 T 
HEN 1510 

1520 INPUT-INPUT NEW NUMBER OF I 
TERATIONS":TEMP 

1530 PRINT-THE PARAMETERS FOR YO 
UR NEXT ENLARGEMENT ARE:" 
1540 PRINT"R1-":XL 
1550 PRINT"R2-":XH 
1560 PRINT"I1-";YL 
1570 PRINT"I2-";YH 
1580 PRINT"ITER-";TEMP 
1590 PRINT"FILENAME-":TEMP$ 
1600 INPUT-PRESS <ENTER> TO BEGI 
N OR <A> <ENTER> TO ABORT" 
:A$ 

1610 IF A$<>"" THEN GOTO 1030 
1620 R1-XL:R2=XH:I1-YL:I2~YH:F$- 
TEMP$ : ITER-TEMP : FX-0 : FY-0 
1630 GOSUB 340: GOTO 360 
1640 '****POKE SCREEN VARIABLES 
INTO SCREEN MEMORY****** 
1650 FOR TEMP-0 TO 4 
1660 LPOKE VA+TEMP.PEEK(P+TEMP) 
1670 NEXT TEMP 
1680 VA-VA+5: RETURN 
1690 '***POKE SCREEN VARIABLES I 
NTO BASIC****** 
1700 FOR TEMP-0 TO 4 
1710 POKE P+TEMP.LPEEK(VA+TEMP) 
1720 NEXT TEMP 
1730 VA-VA+5: RETURN 
1740 '****SET PALETTES********* 
1750 DATA 00.00.49.04.36.39.16.3 
4 . 40 . 25 . 24 . 30 . 09 . 44 . 05 . 09 . 1 6 . 34 . 
27,46 

1760 DATA 54.36.39.54,15.43.34.2 
1.39.54.36.39.0 
1770 IF RB$-"N" THEN READ C 
1780 FOR P-0 TO 15 
1790 READ C:PALETTE P.C:READ C 
1800 NEXT P: RESTORE: RETURN 
1810 '***COMPLETE PARTIALLY COMP 
LETED SCREEN******************* 
1820 GOSUB 1740:GOSUB 340:POKE 6 
5497.0:HSCREEN2:GOTO 380 
1830 END 
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Would you love to make 
games with moving icons 
bul think it would be too 
difficult? If so, you will 
like this program. Icon 
Designer lets you create sets of 39 icons 
using all 1 6 colors, customize the palettes, 
and create custom sets from already exist- 
ing ones. All you have todo is use the utility 
(Listing 3) to load them into a buffer and 
separate them into 39 icons. After typing 
the three programs, make sure you save 
them on several disks in case one of your 
disks crashes. 

When you are finished, run Listing 1, 
DESIGNER. The screen clears to black and 
creates a grid to show you an enlarged 
version of your current icon. At the bottom 
are 16 boxes filled with color, and to the 
right is a list of options. To create an icon, 
select your color by pressing it with the 
arrow (use your joystick to move around). 
The computer beeps and displays your color 
next to the Current Color message. Then 
move the arrow to the grid and press the 
button corresponding to where you want to 
draw. While drawing, you can see the small 
box next to Actual Size start lo fill with the 
color you are using. This shows what your 
final icon will look like. 

To invert the label, press I. The icon is 
inverted to its opposite colors. You are 
again able to see it invert by the Actual Size 
message. If you decide you do not want to 
use this icon, you can clear it by pressing C. 
The icon is cleared to the current color you 
are using, so make sure you have the right 
color selected. 

When you are finished with the icon and 
if you want to keep it, press P. A box 
appears io make sure you want this option. 
To continue, press Y. A box al the top of the 
screen appears, showing all the icons you 
have in your set so far. Move the arrow 
around until you come to the area where 
you want to place your icon, then press the 
button. The icon is pui there and the pro- 
gram returns you to the Edit mode. 



Shane Messer is fourteen years old and has 
worked on the CoCofor ftvo years. He lives 
in Ft. Pierce, Florida, where he attends 
Lincoln Park Academy, and enjoys study- 
ing math, science and playing soccer. He 
may be contacted at 3625 Orange Ave., Ft. 
Pierce, FL 34947. 



If you want to edit an icon, press G. 
Press Y al the prompt and again see the box 
of icons. Select the one you want; by press- 
ing the button you can see the icon placed 
in the icon area. Next the grid adjusts to fit 
the icon. You can then continue editing. 

Pressing A lets you alter the palette slot 
of a desired color. Press Y to verify your 
option. There is a color flickering at the 
bottom; move the joystick around to select 
the color, then press the button. After notic- 
ing the color change, adjust it by moving 
the joystick side to side slowly. When you 
come to a desired color, press the button 
and it changes. When you later load your 
saved icons, the program adjusts lo the 
palette slots you have chosen. 

Using Load and Save should be self- 
explanatory. One thing to note is that you 
need to have at least five granules left on the 
disk. The icon set takes four, and the data 
file for colors takes one. The Search and 
Replace option lets you replace your source 
color with the destination color. This op- 
tion is also self-explanatory. 

Listing 2, CREATSET, is a custom set 
creator. It loads one to three sets of icons 
and allows you to make a new set with 
them. Running this program prompts you 
to enter the filenames of the sets. When you 
are done, press enter. If you only want two 
sets, for example, press ENTER when you 
are asked for the third. 

The program loads your icons and ad- 
justs to the palette slots of the first set you 
selected. When the screen pops up, there is 
a flashing box. Use the arrow keys to move 
il around. When you find an icon you want 
in your set, press ENTER and the box moves 
to the lower part of the screen. This is your 
new set. Move the box to where you want 
il and press ENTER. The box goes back to 
the top, and you can continue until you are 
finished with your new set. To save (he set, 
press S and the program prompts you for a 
filename. If you do not want to save it, press 
ENTER and you return to the program. To 
exit the program, type E. 

The third listing, 1C0NGRAB, is a loader 
for your icons. It loads the desired set and 
separates them into 39 buffer areas. You 
can then use these icons in your own crea- 
tions. Make sure to put the name of your 
icon set into Line 50 of the program. 

I hope you gel a lot of use from these 
programs. Animation should now be a little 
easier after putting your icons in selected 
areas one at a lime. □ 
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Listing 1: DESIGNER 



ICON DESIGNER 

WRITTEN BY SHANE MESSER 

COPYRIGHT (C) 1989 

BY FALSOFT INC. 

ALL RIGHTS RESERVED 

DESIGNED 
FOR THE 128K COCO 3 



10 

30 

40 

50 

60 

70 

80 

90 

100 

110 

120 • 

130 POKE 65497.0 

140 DIM PSU6) 

150 ■ 

160 ON ERR GOTO 1610 

170 • 

180 X~0:Y=0:X]=0:X2-0:X3-0:Y3-0: 

K-0 : W-0 : E-0 : R-0 : T-0 : B-0 : M-0 : N-0 : 

C-0:Z-0:A-0:A$-"" 

190 HSCREEN 2:P0KE &HE6C6. 18: POK 

E &HE6C7.18:HCLS 0:RG-1:GOSUB 44 

0:POKE &HE0D4.&H34:GOSUB 530:GOT 

230 

200 HPAINT(X.Y).C.15:X1-INT(X/10 

):Y1-INT(Y/10):HSET(164+X1.120+Y 

1,C):RETURN 

210 X-JOYSTK(0):Y=JOYSTK(1):X-X* 

5+l:Y=Y*3+l:IF Y>180 THEN Y-180 

ELSE IF X>310 THEN X-310 

220 RETURN 

230 GOSUB 410 

240 GOSUB 210 

250 HGET( X . Y ) - ( X+10 . Y+13 ) . 2 :HDRA 

W"BM-X:.-Y:C15"+AR$:HPUTCX.Y)-(X 

+10.Y+13).2:IF VV-1 THEN RETURN 

260 A$-INKEY$ : IF A$<>"" THEN PLA 

Y"T25L2503A" 

270 IF A$-"I" THEN GOSUB 610 

280 IF A$-"L" THEN GOSUB 680 

290 IF A$-"S" THEN GOSUB 760 

300 IF A$-"C" THEN GOSUB 830 

310 IF A$-"P" THEN GOSUB 900 

320 IF A$-"G" THEN GOSUB 970 

330 IF A$-"R" THEN GOSUB 1050 

340 IF A$-"A" THEN GOSUB 1510 

350 POKE 65497.0 

360 GOSUB 210 

370 IF BUTTON(0)-1 AND YM79 THE 

N C-HP0INT(X.Y):G0SUB 570 
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380 HSCREEN 2: IF BUTTON(0)-1 AND 
X>0 AND Y>20 AND X<150 AND Y<17 
AND HP0INTU.YX15 THEN GOSUB 
200 

390 GOTO 240 
400 ■ 

410 GOSUB 580:HGET(0.64)-(9.96). 

4:GOSUB 590:HGET( 10.20)- (310. 65) 

.l:POKE &HFF98.128:P0KE &HFF99.6 

2:F0R X-0 TO 300 STEP 20:HCOLOR 

Z:HLINE(X.180)-(X+20.191).PSET.B 

F:Z-Z+1:NEXT X 

420 B$-"R5D5L5U5R5":FOR X-0 TO 1 

40 STEP 10: FOR Y-20 TO 160 STEP 

10:HDRAW"S8BM -X; ,-Y ;C15"+B$:NEX 

T Y.X 

430 HCOLOR 15:A$-" Icon desig 

ner - By Shane Messer":HPRINT(0, 

0).A$:HCOLOR 15:A$-" Copyrigh 

t (c) 1989. By Falsoft Inc.":HPR 

INT(0.1).A$ 

440 PALETTE 0.0:PALETTE 1.32:PAL 

ETTE 2.36:PALETTE 3.52:PALETTE 4 

.54:PALETTE 5.18:PALETTE 6.25:PA 

LETTE 7.45:PALETTE 8.16:PALETTE 

9.9:PALETTE 10. 12: PALETTE 11.23: 

PALETTE 12.43:PALETTE 13.56:PALE 

TTE 14.35:PALETTE 15.63 

450 PS(1)-0:PS(2)-32:PS(3)-36:PS 

(4)-52:PS(5)-54:PS(6)-18:PS(7)~2 

5:PS(8)-45:PS(9)=16:PS(10)-9:PS( 

11)-12:PS(12)-23:PS(13)-43:PS(14 

)-56:PS(15)-35:PS(16)-63 

460 IF RG-1 THEN RG-0: RETURN 

470 FOR K-l TO 16:PALETTE K-l.PS 

(K):NEXT K 

480 FOR Y-6 TO 13:READ A$:HPRINT 

(20.Y).A$:NEXT Y 
490 HPRINT(24.16),"- Actual size 

500 HPRINT(24.19)."- Current col 
or" 

510 C-1:G0SUB 570 
520 GOTO 540 

530 HBUFF 1 .6946-.HBUFF 2.110:HBU 
FF 3.160:HBUFF 4.700:GOSUB 580:L 
POKE SH6E000.255:LPOKE &H6E001.2 
55:HBUFF 1.6946:HBUFF 2.110:HBUF 
F 3,160:HBUFF 4.700:GOSUB 590 
540 AR$-"S4D10M+1.-1U8M+1.+1D6RD 
RD2RD2RULU2LU2LU5M+1 .+1D3RU2M+1 . 
+1DR" 

550 RETURN 

560 DATA (I)nvert.(C)lear.(P)ut 
Icon into set.(A)lter palette si 
ot,(G)et icon from set.(L)oad ic 
on set.(S)ave icon set.(R)eplace 
colors 
570 PLAY"T25L25O3A":HC0L0R C:HLI 
NE(163.148)-(178.163),PSET.BF:RE 
TURN 

580 POKE &HE0D4.&H37:RETURN 
590 POKE &HE0D4.&H34:RETURN 
600 RETURN 
610 'INVERT 

620 QO-C:A$-"*** Invert current 
icon ***":GOSUB 1110: IF NO-1 THE 
N RETURN 

630 FOR X2-0 TO 32 STEP 2: FOR Y2 
-6 TO 55 STEP 3:X-X2*5+1 :Y-Y2*3+ 
1 

640 IF X>0 AND Y>20 AND X<150 AN 
D Y<170 AND HPOINT(X.Y)<15 THEN 
GOSUB 660 

650 NEXT Y2.X2:C-QQ: RETURN 
660 Z-HP0INT(X,Y):C~14-Z:G0SUB 2 
00 .-RETURN 



670 RETURN 
680 ' LOAD 

690 A$-"*** Load a new set from 
disk ***":RT-0: GOSUB 1110: IF NO- 
1 THEN RETURN 

700 RT=1234:A$-"*** Insert your 
disk ***":B$-"Press any key":GOS 
UB 1110 

710 GOSUB 1380 

720 POKE 65496.0: IF NO-0 THEN PO 
KE &HE0D4.&H34:POKE &HFFA2.&H34: 
LOADM F$:POKE &HFFA2.SH3A: POKE & 
HE0D4.&H34 

730 IF NO-0 THEN SF$-LEFT$( F$. IN 
STR(F$.".")-1) 

740 IF NO-0 THEN OPEN"I " .#1 . SF$ : 
FOR K-l TO 16: INPUT #1.PS(K):PAL 
ETTE K-1.PS(K):NEXT K:CLOSE:RETU 
RN 

750 RETURN 
760 "SAVE 

770 A$-"*** Save current set to 
disk ***":GOSUB 1110: IF NO-1 THE 
N RETURN 

780 RT-1234:A$-"*** Insert your 
save disk ***":B$-"Press any key 
":GOSUB 1110 
790 GOSUB 1380 

800 POKE 65496.0: IF NO-0 THEN PO 
KE &HE0D4.&H34:POKE &HFFA2.&H34 
SAVEM F$.&H4000.&H5FFF.&HA027:PO 
KE &HFFA2.&H3A:P0KE &HE0D4.&H34 
SF$-LEFT$(F$.INSTR(F$.".")-1) 
810 IF NO-0 THEN OPEN"0".#l .SF$ 
FOR K-l TO 16:WRITE #1.PS(K):NEX 
T K:CLOSE:RETURN 
820 RETURN 
830 ' CLEAR 

840 A$-"*** Clear current icon * 
**": GOSUB 1110 
850 IF NO-1 THEN RETURN 
860 FOR X2-0 TO 32 STEP 2: FOR Y2 
-6 TO 55 STEP 3:X-X2*5+1 :Y-Y2*3+ 
1 

870 IF X>0 AND ¥>20 AND X<150 AN 
D Y<170 AND HP0INT(X.Y)<15 THEN 
GOSUB 200 
880 NEXT Y2.X2 
890 RETURN 
900 ' PUT 

910 A$-"*** Put icon into set ** 
*":GOSUB 1120: IF NO-1 THEN RETUR 
N 

920 GOSUB 1240 

930 HGET (164.122)-(178.136),3:H 
PUT(C1.C2)-(C1+14.C2+14),3 
940 GOSUB 1330 
950 RETURN 
960 RETURN 
970 ' GET 

980 A$-"*** Get icon and erase c 
urrent one ***":GOSUB 1120: IF NO 
-1 THEN RETURN 
990 GOSUB 1240 

1000 HGET (C1.C2)-(C1+14.C2+14). 
3 

1010 HPUT(164.122)-(178.136).3 
1020 GOSUB 1330 

1030 QQ-C:FOR X2-0 TO 14: FOR Y2- 
TO 15:X-X2*10+1:Y-Y2*10+21:C-H 
P0INT(164+X2.122+Y2):HPAINT(X.Y) 
.C.15:NEXT Y2.X2:HC0L0R QQ:C-QQ 
1040 RETURN 

1050 QQ-C:A$-"*** Replace Source 
color with dest. ***":G0SUB 11 
10: IF NO-1 THEN RETURN 
1060 GOSUB 1490: IF NO-1 THEN RET 
URN: ELSE HSCREEN 2: FOR X2-0 TO 1 



4: FOR Y2-0 TO 14:X-X2*10+1 :Y-Y2* 

10+21 :C=HPOINT(164+X2.122+Y2) 

1070 IF C-Vl THEN HSET(164+X2 .12 

2+Y2.V2):HPAINT(X.Y).V2.15 

1080 NEXT Y2.X2 

1090 C-QQ 

1100 RETURN 

1110 ' * ARE YOU SURE * 

1120 GOSUB 580 

1130 A-LEN(A$):A-40-A:A-lNT(A/2) 

:A$-STRING$(A." ")+A$ 

1140 IF RT01234 THEN B$-"Are yo 

u sure?" 

1150 B-LEN(B$):B-40-B:B-INT(B/2) 

:B$-STRING$(B." ")+B$ 

1160 RT-0 

1170 HGET(0,64)-(320.96).l 

1180 FOR X-0 TO 320 STEP 10:HPUT 

(X.64)-(X+9.96).4:NEXT X 

1190 HCOLOR 15:HLINE(0.64)-(320; 

96).PSET.B:HPRINT(0.9).A$:HPRINT 

(0.10).B$ 

1200 A$-INKEY$:IF At-"" THEN 120 



1210 IF A$-"Y" OR A$-"y" THEN YS 

-l:NO-0 ELSE YS-0:NO-1 

1220 HPUT(0.64)-(320.96).l 

1230 GOSUB 590:RETURN 

1240 GOSUB 580 

1250 HGET(10.20)-(220.65),1 

1260 GOSUB 590 

1270 HPUT(10.20)-(220.65).l 

1280 ' MAIN ROUTINE TO SELECT 

1290 X~JOYSTK(0):Y-JOYSTK(1).:X-I 

NT(X/5):Y-INT(Y/30) 

1300 X1-X:Y1-Y:X-X*16+10:Y-Y*15+ 

20 : VV-1 : X-X+5 : Y-Y+5 : GOSUB 250 : X- 

X-5:Y-Y-5:VV-0 

1310 IF BUTTON(0)-1 THEN Cl-X+1: 

C2-Y: RETURN 

1320 GOTO 1290 

1330 ' END OF MAIN ROUTINE 

1340 HGET(10.20)-(220.65),1 

1350 GOSUB 580 

1360 HPUT(10,20)-(220.65).l 

1370 RETURN 

1380 WIDTH 40:CLS 2:ATTR 0.1:CLS 

1390 A$-"*** ENTER FILENAME ***" 

:GOSUB 1480:PRINT:PRINT:A$-STRIN 

G$ (4. CHR$ (8 ))+"->": GOSUB 1480: LI 

NEINPUT F$:HSCREEN 2 

1400 WIDTH 40: IF F$-"DIR" THEN P 

OKE 65496. 0:DIR:PRINT"Free ->";F 

REE(0):EXEC44539: HSCREEN 2:F$-"" 

1410 NO-1 : IF LEN(F$)>12 THEN RET 

URN 

1420 IF F$="" THEN RETURN ELSE I 

F INSTR(F$.".")>9 THEN RETURN 

1430 FOR K-l TO LEN(F$):IF MID$( 

F$,K.l)-"/" THEN MID$(F$.K.l)-". 

1440 NEXT K 

1450 IF LEN(F$)>8 AND INSTR(F$." 

."XI THEN RETURN 

1460 IF INSTR(F$."."X1 THEN F$- 

F$+".BIN" 

1470 NO-0: RETURN 

1480 A-LEN(A$):A-40-A:A-INT(A/2) 

:PRINTSTRING$(A." ") :A$ ;: RETURN 

1490 WIDTH 40:CLS 2:ATTR 0.1:CLS 

:A$-"Enter source color ->":GOSU 

B 1480:LINEINPUT A$: V1-VAL( A$) :A 

$-"Enter destination color ->":G 

OSUB 1480:LINEINPUT A$:V2-VAL(A$ 

) 

1500 IF Vl>-1 AND VK15 AND V2>- 

1 AND V2<15 THEN NO-0:RETURN ELS 

E NO-l:HSCREEN 2:RETURN 
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Label Designer 

Everything you'd want a label program to do and more! 
No other program lets you make great labels so easily. 



• Mail Merge Option merges name and address or other text file data 
lor printout onto your custom label templates with graphics and other text. 
Great lor club mailings, Christmas card lists, membership name tags, etc. 



• Print Labels With Text And Graphics: use Label Designer's 

tonts and pictures or any of Zebra's optional Picture & Font Disks. 

• Zebra Systems' Graphics User Interface: Pull down menus, 

scrolling-window file selectors, dialog boxes, radio Buttons, the works! 

• Standard Features: Click and drag picture placement, up to 4 pictures 
per label, 3 dillerenl picture sizes, powerful text editing with variety of type fonts 
and sizes, prints 1-999 copies, templates for standard & large address, file fold- 
er, disk, and cassette label sizes. 



W nV DISK LABEL 


— +' 


LIGHT FUT 


Serif m 


SANSERF .FIIT 


BOLD :FNT 


UBLFONT FUT 


0Sffll5F.RF.FNT 


WE .fiit 


SHADOW ,FNT 


ETHEL SGH 


SCRIPT .FMT 


SCRIPTS .FUT 


ARCADE .FUT 


C0MPUTER.FH1 


KIM! .SGN 


WESTERN .FMT 


BETHl .SON 


BETH? ,SGN 


LBLFOtiT SML 



MR . & MRS . 

64K FLOPPY 

SOMEWHERE.. 



COCO USER 

D I SK DR I VE 

PA 12345 



Merry Christmas from the Zebra family! 



3 5 
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• Disk Directory Option pastes the names of your disk files onto the la- 
bel text editor screen for inclusion on your labels. 

• Serial Numbering Option for making sequentially numbered admis- 
sion tickets, product numbering, inventory labels, etc. 

• Hardware Requirements: 

CoCo II 64K, oi CoCo 3, disk drive, mouse or joystick, compatible printer 
(compatible with same printers as CGDP except DMP-130 and DMP-130A in serial mode). 

• Includes disk, laser typeset useFs manual ^JQ^l Q^k 
and sample quantities of dilferent size labels. Price: *pOTfc»£ftJ 
We stock while and colored labels in a variety of address, disk, and cassette siz- 
es at competitive prices. 



Banners, Signs & Greeting Cards 




The CoCo Graphics Designer Plus, produces 

beautiful greeting cards, banners, and signs for holidays, birth- 
days and olher occasions. 

The CGDP features an easy-to-use point and click graphical 
interlace with windows, scroll bars, radio buttons, and joystick 
or mouse control. Text can be used in up to 4 sizes and 16 
fonts per page. Picture, Font, and Border collections are in- 
cluded. Signs and cards can be previewed on screen. 

Read the review in May 89 Rainbow. 
CGDP Disk S 64 page typset manual. 




$29.95 



Picture Selection Screen 

Requirements: CoCo II 64K or CoCo 
III, disk drive, RSDOS, joystick or 
mouse. Printers supported include: Ep- 
son RX/FX/LX, Gemini 10X, SG10, 
NX10, NX1000, DMP1 05/1 06/1 10/1 20/ 
130/132/200/400, Panasonic KXP1080 / 
90 /91/92, Prowriter, Cltoh 8510, 
Okidala 92/93/182/183 & more. 



Label Designer & CGDP 



Optional Picture, 
Font, and Border disks. 

$14.95 each. 

Picture Disk #2 4 sets of 30 pictures ea„ Sports, 
America, Party, Office, Total 120 pictures. 
Picture Disk #3 4 sets of 30 pictures ea. Animals, 
Nature, Religion, Travel, Total 120 pictures. 
Picture Disk #4 120 Holiday Pictures: Christmas, 
Chanukah, Thanksgiving, New Year's, Easter, Hallo- 
ween, etc. 

Font Disk A 10 Fonts: Western, Stencil, Banner, 
Shadow, Variety, Type, Stripes, Digital, Bold3, Object 
Font Disk B 10 Fonts: Arcade, Circle, Alien, Cube, 
Baroque, Deco, Block, Gray, Computer, Script 
Border Disk #1 Contains 176 High resolution bor- 
ders, great variety from simple to ornate. (The border 
disk is for use with the CGDP, but not with the Label 
Designer). 




These are a few samples from the 120 Holiday 
Pictures on Picture Disk#4 for the CoCo Graphics 
Designer Plus and Label Designer. Merry Christmas! 



HARDWARE 

Color Computer Mouse (Quantities Limited). ..19.95 

Atari-To-CoCo Joystick Adaptor 12.95 

WICO Trackball Controllers 29.95 

HDS Floppy Disk Controllers with RS ROM.. 59.95 

Disk Drive Case & Power Supply 35.00 

Wildcard Cartridge Emulator 109.95 

SOFTWARE 

Car Sign Designer 14.95 

Disk Utility 2.1a 14.95 

Printer Font Generator 14.95 

Multi-Pak Crack 14.95 

Telepatch III 14.95 

Tape/Disk Utility 14.95 



Ordering Instructions: All orders add $3.00 Shipping & Handling, UPS COD add $3.00. VISA/MC Accepted. PA residents add 

sales tax. Hours 9-5 Monday to Friday . We offer comprehensive sales and customer support for Zebra Systems Products. 

Paul & Tony's Stereo- 121 S. Burrowes Street- State College, PA 16801- (814) 237-2652 



1510 A$-"*** Alter palette slots 
***":G0SUB 1110: IF NO-1 THEN RE 
TURN ELSE OQ-C 
1520 X-JOYSTK(0):X-INT(X/3) 
1530 IF X>15 THEN X-16 
1540 HGET(X*20.180)-(X*20+20.191 
),4:HPUT(X*20.180)-(X*20+20.191) 
.4.PRESET:HPUT(X*20.180)-(X*20+2 
0.191). 4, PSET 
1550 IF BUTTON(0)-1 THEN 1570 



1560 GOTO 1520 

1570 IF BUTTON(0)-1 THEN 15701580 

X-X+l 

1590 PS(X)-JOYSTK(0):PALETTE X-l 

.JOYSTKC0) : IF BUTTON(0)-1 THEN 1 

600 ELSE 1590 

1600 IF BUTTON(0)-1 THEN 1600 EL 

SE RETURN 

1610 HSCREEN2:POKE 65497 .0: V-ERN 

0:ER$-"Unknown Error!" 



1620 IF V-20 THEN ER$-"I/0 Error 
I" ELSE IF V-10 THEN ER$-"Device 
number error!" ELSE IF V-31 OR 
V-26 THEN ER$-"Unlocatale disk n 
ame!" ELSE IF V-23 THEN ERS-"Inp 
ut past end of file!" ELSE IF V- 
1 THEN ER$-"Syntax Error in line 
"+STR$(ERLIN) 

1630 A$-ER$:B$-"Press any key":R 
T-1234:G0SUB 1U0:GOTO 300 







91 


V/Tl50 




71 

231 


-I 


330 




400 .... 


85 




500 .... 


138 




580 


182 




END 


255 



Listing 2: CREATSET 

10 ' - 

30 ' CUSTOM ICON SET CREATOR 
40 ' 

50 ' WRITTEN BY SHANE MESSER 
60 ' COPYRIGHT (C) 1989 
70 " BY FALSOFT INC. 
80 ' ALL RIGHTS RESERVED 

90 ' ■■■-, 

100 • OESIGNED 

110 ' FOR THE 128K COCO 3 

120 ' - - 

130 POKE 65497. 0:ON BRK GOTO 130 

:ON ERR GOTO 620 

140 GOSUB 300:X-0:Y-0 

150 GOTO 470 

160 FOR T-338 TO 345:POKE T.255: 

NEXT T:A$-INKEY$:IF A$-"" THEN A 

$-■• •■ 

170 IF A$-"*" THEN Y-Y-l 

180 0-ASC(A$):IF 0-9 THEN X-X+l 

ELSE IF 0-10 THEN Y-Y+l 

190 IF 0-8 THEN X-X-l 

200 IF 0-13 THEN RETURN 

210 IF 0-83 THEN GOSUB 560 

220 IF 0-69 THEN GOSUB 540 

230 IF X<MX THEN X-MX 

240 IF Y<MY THEN Y-MY 

250 IF X>XX THEN X-XX 

260 IF Y>YY THEN Y-YY 

270 POKE 65497.0 

280 HGET(X*16-5.Y*15)-(X*16+8.Y* 

15+14). 1:HC0L0R 15 : HLINEC X*16- 5 . 

Y*15)-(X*16+8.Y*15+14).PSET.B:HP 



UT(X*16-5.Y*15)-(X*16+8.Y*15+14) 

.1 

290 GOTO 160 

300 ON BRK GOTO 300:DIM PS(16):H 

SCREEN 2:HCLS 0:HBUFF 1.4000:HBU 

FF 2.2000:POKE SHE6C6.0 

310 ON BRK GOTO 50:CMP:WIDTH 40: 

CLS 3:ATTR 2.4:CLS:F0R H-l TO 3 

320 ON BRK GOTO 320:CLS: PRINT"Wh 

at is the filename of icon set"+ 

STR$(H)+" ->";:LINEINPUT F$ 

330 IF F$-"" AND H>1 THEN 390 EL 

SE IF F$-"" THEN CLS4:ATTR 2.4:C 

LS: PRINT" No icons selec 

ted!":END 

340 IF H-l THEN A$-F$ 

350 POKE 65496. 0:POKE &HE0D4.&H3 

4:P0KE &HFFA2.&H34:P0KE 65496.0: 

LOADM F$:POKE &HFFA2.&H3A: POKE & 

HE0D4.&H34 

360 HSCREEN 2:HPUT( 10. (H-l )*45)- 

(220.H*45).1 

370 WIDTH 40:CLS 3:ATTR 2.4:CLS 

380 NEXT H 

390 HSCREEN 2 

400 IF INSTR(A$.".")>0 THEN A$-L 

EFT$(A$.INSTR(A$. ".")-!) 

410 0PEN"I".#1.A$:F0R K-l TO 16: 

INPUT #1.PS(K):PALETTE K-l.PS(K) 

:NEXT:CLOSE 

420 POKE 64597. 0:HSCREEN 2 

430 HCOLOR 15:HLINE(222.0)-(319. 

191). PSET. B 

440 FOR K-l TO 20: READ A$:A-LEN( 

A$):A-12-A:A-INT(A/2):A$-STRING$ 

(A." ")+A$:HPRINT(28.K).A$:NEXT 

450 RETURN 

460 DATA Icon Desg. .Customi zer, - 

.Written by. Shane. Mes 

ser. .Copyright, (c) 1 

989. By Falsoft. ..Opt 

ions. .(E)x1t .(S)ave 

470'6n'bRk'gOTO 470:MX-1:MY-0:XX 
-13:YY-8:G0SUB 160 
480 FX-X:FY-Y 



490 ON BRK GOTO 490:MX-1 :MY-9:XX 
-13:YY-11 

500 IF PEEK(338)-191 THEN 500 
510 GOSUB 160 

520 HGET(FX*16-5.FY*15)-(FX*16+8 
.FY*15+14).l:HPUT(X*I6-5.Y*15)-( 
X*16+8.Y*15+14).l 
530 GOTO 470 

540 WIDTH 40:CLS 3:ATTR 2.4:CLS: 
LINEINPUT" Exit 

Are 

you sure ->";Y$ 
550 IF LEFT$(Y$.1)-"Y" OR LEFT$( 
Y$.l)-"y" THEN WIDTH 32:CLS:CMP: 
POKE 65496. 0:END ELSE HSCREEN 2: 
RETURN 

560 WIDTH 40-.CLS 3:ATTR 2.4:CLS: 
LINEINPUT" Save 

F11 
ename:";F$ 

570 IF F$-"" THEN HSCREEN 2:RETU 
RN 

580 POKE 65496. 0.-HSCREEN 2:P0KE 
&HE0D4.&H34:HGET(10,135)-(220,18 
0).1:POKE &HFFA2.&H34:SAVEM F$,& 
H4000.&H5FFF.&HA027:POKE &HFFA2. 
&H3A 

590 IF INSTR(F$.".")>0 THEN F$-L 
EFT$(F$.INSTR(F$.".")-1) 
600 OPEN"0".#1.F$:FOR K-l TO 16: 
WRITE #1.PS(K):NEXTK:CL0SE 
610 HSCREEN 2:RETURN 
620 POKE 65496. 0: V-ERNO: ER$-"Unk 
nown Error!" 

630 IF V-20 THEN ER$-"I/0 Error! 
" ELSE IF V-10 THEN ER$-"Device 
number error!" ELSE IF V-31 OR V 
-26 THEN ER$-"Unlocatale disk na 
me!" ELSE IF V-23 THEN ER$-"Inpu 
t past end of file!" ELSE IF V-l 

THEN ER$-"Syntax Error in line" 
+STR$(ERLIN) 

640 A$-ER$:WIDTH 40:CMP:CLS 4:AT 
TR 2.4:CLS:F0R K-l TO 10:PRINT:N 
EXT K:K-LEN(A$):K-40-K:K-INT(K/2 
):LOCATE K. 11 : PRINTA$ : END 







172 

238 

179 

84 


\A 40 

1 80 




130 .... 
END... 



Listing 3: ICONGRAB 

10 ' GRABBER UTILITY FOR ICON 
DESIGNER. WRITTEN BY SHANE 
MESSER AND COPYRIGHTED BY 
FALSOFT. 

20 ' THIS PROGRAM WILL GET YOUR 



ICONS FROM A FILE. AND THEN 
SEPARATE THEM INTO 39 BUFF- 
ER AREAS SO YOU CAN HPUT 
THEM BY NUMBER. 

30 ' - -- 

40 FOR T-l TO 40:HBUFF T.190:NEX 

T T:POKE &HE0D4.&H37 : LPOKE &H6E0 

00.255:LPOKE &H6E001 . 255:HBUFF 1 

.5000 

50 F$-"NEW1":P0KE &HFFA2.&H37 : LO 

ADM F$:POKE &HFFA2.&H3A 

60 OPEN"r\#l.F$:FOR K-0 TO 15:1 

NPUT #1.A:PALETTE K.A:NEXT 

70 HSCREEN 2:HPUT( 10. 10) - (220.55 

).l 

80 POKE &HE0D4.8H34 



90 FOR H-10 TO 200 STEP 16:F0R V 
-10 TO 45 STEP 15:J-J+1:HGET(H.V 
)-(H+14,V+14).J:NEXT V.H:HCLS 

100 ' 

110 ' THIS RPUTINE WILL PUT THE 
ICONS ONTO THE SCREEN. 

120 ' - - 

130 K-0: FOR Y-0 TO 40 STEP 20 

140 FOR X-0 TO 180 STEP 20 

150 K-K+l 

160 HPUT(X.Y)-(X+14,Y+14).K 

170 PLAY"T10L10O3A" 

180 NEXT X.Y 

190 EXEC 44539 

200 ' 



/K\ 
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BASIC Training 



The Unfolding Block 



by Joseph Kolar 

Contributing Editor 



c 



omposing a graphics design 
is dynamic because there is 
constant evolution in the 
presentation of the theme. 
No idea is a set piece. This 
i ensures excitement when we produce ele- 
ments of an unfolding block design. The 
keyboard never knows what will happen 
next. Somehow time inexorably slips by 
because the graphics programmer is in 
absolute communion with the CoCo. 

Let's dispense with our utility. Although 
utilities are helpful, we budding artists do 
not demand a crutch. When we go on a 
creative binge, watch out! We don't know 
where we are headed. We can improvise a 
hundred times as we go along. That is the 
difference between a creative innovator 
and a hack. 

We use graph paper and scratch sheets 
to block out ideas and plan segments of the 
nebulous grand design — after all. Le- 
onardo de Vinci and Michaelangelo made 
sketches. 

In this, as in other tutorials, we let it all 
hang out — warts and all. We make mis- 
takes, use poor judgement, and abandon 
half-baked ideas. This is a real-life pro- 
gramming effort. 

The idea is to make a few shapes other 
than the 8-by-12 graphics characters used 
as raw material to whip up a graphics 
confection. In so doing we get plenty of 
practice. We are not choosy, just lazy. We 
chose the first DRAW statement from a previ- 
ous tutorial, being very democratic and 
using what is near at hand to start some- 
where — and away we go! 

Type in lines 2. 10, 200 and 1000 from 



Florida-based Joseph Kolar is a veteran 
writer and programmer who specializes in 
introducing beginners to the powers of the 
Color Computer. 



Listing 1. At the end of Line 10 add 
:SCREEN1.0 and run the program. Trace 
Line 200 on graph paper. These chores are 
easier to do and are fun. You feel as an artist 
does when mixing colors on his palette in 
anticipation of creating the masterpiece. 

Type in Line 400 to start smearing it on 
the canvas. We make a 4-by-8 rectangle 
and lake our first tentative brushstrokes. 
Type in lines 6 10 through 640 ending them 
with Variable A — all four PSET. Then run 
the program and press break. Change the 
last two to PRESET and run the program — 
not very inspiring! We abandon the idea 
and decide to paint, in that same area, a 
four-unit square consisting of CHR$(134) 
and CHR$(137). 

Type in lines 2 1 through 220 and rough 
them out on graph paper. Type in lines 410, 
420 and 600. Edit lines" 6 1 through 640 to 
end with D, C, D and C, respectively — all 
PSET and run the program. On your graph 
paper, block out the four-unit design near 
the center and add elements as you develop 
your work of art. 

Let's put the four curlicues around this 
design, without regard to the standard lo- 
cating points with which we worked. We 
locate the coordinates free-hand, using 
educated guesses or sneak peeks at our 
sketches. Then we jockey them into posi- 
tions that don't jar our artistic sensibility. 

Next, carefully type in lines 690 through 
720 and run the program. Note that the 
curlicue units do not fit snugly like jigsaw 
puzzle pieces. They are further out and 
tucked closer in on the horizontal. This 
satisfies my whim. Had they been set 
symmetrically, it is almost certain the pro- 
gram would have evolved differently be- 
cause a different perspective would have 
been kicking around in my mind. 

Now list lines 690 through 720. Copy 
the PUT info into lines 770 through 800 with 
the variables unchanged — all NOT. Then 
run the program. There is a little movement 



to add gusto to the limp design. Run through 
it a few times. Did you notice that NOT 
caused the reverse image to be drawn? 
Change these lines to end in AND, then run 
the program. If you also try PSET and PRE- 
SET, you will find that PSET, AND and OR give 
the first image. PRESET and NOT give the 
reverse image. 

Change Line 690 to end PRES ET. Change 
Line 770 to end, in order, PSET, PRESET, 
NOT, OR and AND, one at a time. As you can 
see, AND wipes out the image and OR substi- 
tutes an 8-by-I2 block. 

Study the changes that occur. They are 
grist for your knowledge mill. If the previ- 
ous setting in that particular location is 
PRESET, then AND gives you the wipe-out 
and OR gives you the mating full block. The 
operators (NOT. AND and OR) act differently 
on an area, depending on what state it is set. 

You may want to experiment by running 
all five through their paces and making a 
list of the results in various combinations. 
These operators are tricky, but they are a 
joy to smear on the canvas to make fancy 
brush strokes. 

Return Line 690 to PSET and Line 770 to 
NOT. At this point the flowering design can 
stand a little accent in the middle to blink on 
and off. Key in the line: 

810 DRAWBM100.100D4 

and run the program. Change Line 810 to 
end in 98. D8". After running the program, 
change it to 99 , D6" and run it again. Pick a 
winner! All the coordinating locations are 
found by trial and error. This is excellent 
practice and is highly recommended. Once 
you get the feel of guiding a design element 
to its birth, you feel like a tugboat captain 
pushing here, nudging there, moving your 
creation ever so skillfully to where you 
want it anchored. 

This is an important distinction: If you 
plot it out exactly, your design is located in 
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a preordained location. If you jockey il into 
position, you can change your mind many 
times and are never quite sure where it will 
end up. That's the uncertainty principle of 
creativity. (To my depraved mind it looks 
like a tick-tocking cuckoo clock.) 

A short pause might be in order to make 
it more dramatic. Type in Line 820, the 
pause routine, and Line 830 to loop back 
and see our work in glorious action. 

Note: To get the maximum use out of an 
animation sequence, keep a weather eye 
out for short, quickly executed program 
lines. They enhance the speed of the se- 
quence because the CoCo doesn't have to 
read long program lines or search out long 
GOSUB routines. 

How would the design look if we put a 
small block between each moving ticker? 
Type in lines 230 through 260. On graph 
paper copy ihem and shade in the colored 
area. It is important to visualize the shape 
of the raw material. The area enclosed in 
lines 230 and 250 is 4-by- 1 2. while the area 
in lines 240 and 260 is 8-by-6. 

The newly sized shapes give you the feel 
of working out new batches or coordinates. 
Without looking at the listing and using the 
hot scoop in lines 230 through 260. create 
four GET lines using variables Q. R, S and T, 
respectively. They were dimensioned at 
the beginning to save the bother now. 

When you are finished, compare your 
work with Listing 1 . Line 440 should show 
a discrepancy. Guess who made a mistake? 
You have ( 110,0)- (118.6). Why didn't I 
spot it? 1 picked up the wrong block due to 
the error, and using the empirical method I 
located it in an area that did not conflict 
with any other design element. Therefore it 
never showed up. If something appears 
funny, spot-check the GET as a matter of 
course. 

I suspect we could make one design 
element to serve the set of four individual 
ones. Copy this line on graph paper to see 
what it looks like: 

DRAW"BM0.0BD6BR4BU6BR4BD6BR4BD6B 
L4BD6BL4BU6R4U6L4D6BL4BU6" : PAINT 
(5, 7). 4. 4 

Later on you might want to see what you 
can come up with using this line. Do you 
see how we always manage to profit from 
mistakes? Ordinarily you may not think of 
things suggested while in hot pursuit of 
boo-boos. 

Now let's use my trial -and-error coordi- 
nates and type in lines 650 through 680 
exactly, then run the program. If only we 
could make the four boxes move in unison, 
from the center, in, out, in, etc. Our design 



blocks are made to order — R and T on the 
horizontal plane, and Q and S along the 
vertical axis. 

Type in lines 730 through 760 exactly. 
Look over the coordinates, which are set to 
correspond in reverse with the ones in lines 
650 through 690. Compare the mating lines 
to see what offset is made in which direc- 
tion, then run the program. This should 
make you good and googly-eyed. 

For the heck of it type in Line 685: 

DRAWBM100.100D4" 

Never lose an opportunity to add variety 
and simulate motion. For a little variation 
type in Line 765 unmasked, then run the 
program, using CSAVE. 

Turn your attention to Listing 2. We 
have to attend to a few housekeeping chores. 
In PM0DE3, a four-color set, 4,4 is the default 
mode. Why don't we remove them from 
lines 210 and 220. in two places each? We 
discarded the A block in Line 200. Delete 
Line 200 and its associated GET, then delete 
Line 400. If you are using my Line 440, 
Line 240 is inoperative. Next, delete Line 
240 and run the program. 

To jazz up the pulsating boxes, change 
4.4 in lines 230. 250 and 260 to 2,4. Then 
run the program. 

Sooner or later we have to face up to 
centering our design. We can attack this 
problem two ways. First we can go through 
the PUTs and add to each pair of starting and 
ending coordinates +28, -6. The other, more 
interesting way is to use the.v.v ploy, then 
type in the line 605 X-128:Y-96. Line 640 
begins with the staining coordinates at the 
point of origin of both the graphics element 
and the entire design. You may want to use 
it as a point of reference. Al I PUT statements 
using C and D are 8-by-12; all PUT state- 
ments using Q and S are 4-by- 12; all PUT 
statements using R and T are 8-by-6. Work 
them out without looking at Listing 2. 
Reorient DRAW lines 685 and 810. You'll 
find it to be a routine task and a pleasant 
challenge. Then run the program to make 
sure all is well. 

Mask Line 600. Type in Line 601 un- 
masked, then run the program. I'll bet you 
never anticipated this design! 

Mask Line 601. Type in Line 602 un- 
masked, then run the program. Next mask 
Line 602, type in Line 603 unmasked, then 
run the program. I like it! Unmask Line 765 
for a variant, then run the program. 

The SCREEEN7.1 is CoCo's attempt to 
drive you nuts. It is harmless but necessary. 

Now go back and unmask lines 600 
through 602. Mask 765 and run the pro- 
gram after masking lines 601 through 603. 



It's time to CSAVE you-know-what. 

It is also time to inspect the pulsating 
design. Should we add more routines? 
Should we enlarge it by adding more ele- 
ments? This is a matter of judgment. 

I see it as a complete entity that makes a 
statement. More elements can be added, 
but we are on the threshold of either an 
artistic statement or a mass of writhing 
junk. In other words, there is a time to stop 
and say, "This is it!" 

This is not to say that we dare not 
continue experimenting. Change lines 650 
through 690 to end in OR. then run the 
program. This variation gives a deliberate 
push outward from the center. Unmask 
Line 765, then run the program. The dots 
are added for accent. Practically any judi- 
cious alteration you make gives you some 
new variation. Change lines 650 through 
680 to end in NOT, then run the program. For 
a bit more animation, mask Line 765. then 
run the program. 

To see what happens, list lines 610 
through 640, copy into lines 725 through 
728 (except to end in PRESET), then run the 
program. It is a little too much. It slides 
across the threshold, changing from ele- 
gant to rococo. Do you see the subtle shift? 
Impressive but visually too ornate and 
confusing. Type in the line 724 GOT0730 to 
bypass this option. 

Type in the line 200 DRAW'Cl ". then run 
the program. Why do we always get neat 
designs no matter what we do? The secret 
is a well-balanced design. Next, delete Line 
200. 

How is your imagination? For a t»ur de 
force, key in the line: 

604 SCREEN6:PM0DE3:PCLS6:PM0DE2 

then run the program. I call it Pair of 
Turtles in a Big Rush. Retype the line: 

604 SCREEN2:PCLS0:PM0DE0 

and run the program again. This one is 
called Three-Eyed Martial Yak-Yakking. 

Mask lines 685 and 810. changing Y to 
45 in Line 605. Retype the line: 

604 PM0DE2:PCLS1:PM0DE3:SCREEN4 

and run the program. It is entitled Opposing 
Armies Maneuvering. 

Change Y to 1 82 in Line 605, retype the 
line: 

604 SCREEN8:PCLS2:PM0DE1:PCLS3 

and run the program. I call it Martian 
Voyeur Behind Wall. 
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Finally change Line 605 back lo Y-96 
and retype the line: 

604SCREEN2 : PM0DE1 : PCLS3 : PM0DE3 

then run the program. You guessed it! I 
made a mistake and typed in PCLSC3 instead 
of PCLS3. Now you make the mistake and 
run the program. CoCo is driving me up the 
wall, but it is fun. If you have a yen. you can 
CSAVE any of the pictures (sic) for posterity. 

Delete Line 604. Is Line 600 unmasked? 
Run the program. Do you have the pulsat- 
ing design with the center elements and 
accent removed? If not, remove them on 
your own. Here is a project. Reposition 
four mating elements as close as possible, 
to the point of origin at .v.v. Then bring the 
other four in as close as is feasible. Depend- 
ing on which four mating units you pull in 
first, the resultant design is apt to be differ- 
ent. Take it from there and create a goodie, 
then CSAVE a copy, which is Listing 3. 

Do you wonder about all those oddball 
screens (SCREEN7, for example)? CoCo is 
trying to impress you. They all translate to 
SCREEN1.0. 

When you are using GET/PUT to explore 
or create some design, use the x,y system 
rather than numbered pairs of coordinates. 



Inevitably you move them about the screen. 
By changing x or y, you move the entire 
design in one fell swoop. Line 685 and 8 1 
should have been converted to x,y coordi- 
nates, but we cover that later on. Use 
numerical offsets for now. 

I call this in-place animation. We have 
given it the appearance of motion. All we 
did was quickly substitute images in eight 
or 12 locations. The accent ticks in the 
center alternate because it is separated 
physically in the program by lines 610 
through 640, a part of each one of the four 
creating the blank area. 



Here is one bonus variation: Use Listing 
3. Mask lines 724, 765 and 810. then end 
lines 725 through 728 in NOT. Type in the 
line: 

604 SCREEN6:PM0DE3:PCLS6:PM0DE2 

then run the program. The turtle is double- 
timing. 

There is just no end to the number of 
variations you can develop. It seems one 
variation begets another. You must agree 
that working with graphics is both gratify- 
ing and habit-forming. Q 





16K Extended 


^ 












200 DRAWBM40.0R8D6NL8BD6BL8BU6U 

6":PAINT(46.2),4,4 

210 ORAW"BM20.0R4ND12BR4BD6NL8D6 

L4BL4BU6U6":PAINT(22,2).4.4:PAIN 

T(26.8),4.4 

220 DRAVPBM30.0BR4R4D6NL8BD6BL4N 

U12L4U6BU6":PAINT(36.2),4.4:PAIN 

T(32.10).4.4 

230 DRAWBM100.0R4D6NL4BD6BL4BU6 

U6":PAINT(102.2).4.4 

240 DRAWBM110.0R4ND6BR4BD6BL4L4 

U6":PAINT(112,2).4,4 

250 DRAWBM120.0BR4BD6NL4D6L4U6B 

U6":PAINT(122.8).4.4 

260 DRAWBM130.0BR4ND6R4D6L4BL4B 








/ 


109 
81 
55 
16 




V 


250 
660 








760 

END . 




Listing 1: LIST1NG1 

3 'LISTING1 

2 DIM A(2).C(2),D(2).Q(2) 

(2),T(2) 

10 PM0DE3.1:PCLS 


R(2).S 



= gg~OS9— File=Utilities= Games— Hardware— BASIC — Support- 



Games 



,-'."":-. Level 2 OS9 scrambled- letter 

\~J VTT) T-dXP1 1 w""* game for 1-16 players. 

)\ il'A«V »* "BBlnst "» computer's 

J&sV $19.95 15,000 word dictionary or 

*»» friends. Requires 256K. 

Don't be afraid of the dungeons . . . 9v.V9l ' 

DAGGORPATCH puis (he thrill back into your Oyns 
Micro Dungeons of Daggorath™ game cartridge by 
patching it to run from disk. Includes disk load & save, 
auto-repeat command, pause, OMP-100 screen dump, 



y 



Special: While supplies last, get both 
Daggorpatch and the Dungeons of 
Daggorath cartridge for only $19,951 



BASIC 



Hardware; 



CoCo-XT Hard Disk interfaces 

NO HALT • 1 or 2 hard drives • 30% faster than SASI • Uses PC-typo 
hard disk drives & controllers • 5 Meg to 120 Meg per drive • Does not 
use interrupts • Mulli-PAK recommended • Includes EZGen boot file 
editor for easy installation - CoCo XT-RTC inclidcs real-lime dock 

CoCo XT $69.95 CoCo XT-RTC $99.95 

XT-ROM AUTO-BOOT ROM . . . Automatically boots OS9 from your 
Burke & Burke hard drive at power-up. Use XT-ROM as a convenience. 
or for fail-safe CoCo operation In unattended BBS, home security, etc. 



HVOFR.I//1 <C9Q QR Modifies disk BASIC to use hard 
— irtzn i/y »«.»o disk3 (CoCo xt, disto, LR), ram 

disks, and any mil of 35-160 track floppy disks. Fully RESET 
protected, 16K EPROM-able. 

UVP F fj-lll t19 Qi^ RAM disk and print spooler for 
n ' r ^^ fl '" »"'' J HYPER-I/O & 512K CoCo 3. 

Hyper-I/O 

Utilities & 

Disk Doctor 



XT-ROM $19.95 ( f hard disk cable set $17.sT) 

A New Breed ol CoCo 3 Memory Expansion 
VK9 vour CoCe 3 64K x 4 memm chinsl 

Our revolutionary QuartorMeg circuit adds four new 64K 
x 4 memory chips to the memory chips already in your 
126K CoCo 3. Doubles your OS9 and BASIC memory to 
2S6K. Most of tho advantages of 512K, at half the costl 

Bare board $39.95; with 4 chips $69.95 
•"-"•-•-. l File 




HYPER-I/O Utilities $21.95 



Kevin Berner's wildcard copy, delete, and file 
search utilities for HYPER-I/O. 

HYPER-I/O Disk Doctor $17.^T 



Kevin's second utility package. Find bad sectors, edit FAT, etc. 

ff,g,P, rffgg/ BASIC for QS9) $39.95 



Burke & Burke's R.S.B. la a complete. Level 2 OS9 compatible 
version of Disk Extended Color BASIC. Loads and saves BASIC 
programs in OS9 format. Includes BAS1C-OS9 file transfer utilities. 
Requires 256K, Level 2 OS9, RS-DOS / ADOS 3 / CDOS ROM. 



WASHINGTON RESIDENTS 

PLEASE ADD 0.1% SALES 

TAX U.S. COD'a add 52.75. 

Minimum U.S. shipping & 

handling S3. 00. 

$4.00 minimum shipping to 

Canada. PIobbo allow 2 weeks 

tor delivery. Ovnrnlght or 

2-day delivery available tor 

In-stock Items. 

Software upgrades £5.00 oach 

w/ receipt, Including U.S. 

shipping. 

Telephone orders call 
1 (BOO) 237-2409 

Tochnlcal support call 
1 (206) 235 0917 



RAINBOW 

omnnonoM 




File System 




Your OS9 disks are suffering from a bad case of 
fragmentation, and ($29.95) we've got the cure. 

As OS9 modifies files, it breaks them into many small pieces spread across your disks. Ou 
new File System Ropack program oxaminos each file on your hard or floppy disk. It 
reverses the effects of fragmentation by gathering up and combining pieces of files. In 
sddllion to tho immediate benefit of s taster system, our program also reduces dick head 
movement — In tho long term, decreasing woar on your system's mechanical parts. 



/OS9 Utilities .". 



Wild & MV Version 2.1 

Use "wildcards" with most OS9 commands, or 
rearrange your directory tree. Features recursive 
directory searches. A hard disk must! $19.95 



EZGen Version 1.06 

Powerful OS9 bootlile editor. Change module names, 
add or delete modules, patch bytes, or rearrange 
modules. Works on other files, too. $19.95 



P.O. Box 58342 Renton, WA 

98058 

(206) 235-0917 
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U6":PAINT(136.2).4.4 




650 


PUT(98.70)-(102,82).Q.PSET 


750 PUT(76.100)-(84.106).R.PRESE 


400 GET(40.0)-(48.12).A.G 




660 


PUT(98.122)-(102. 134). S. PSET 


T 


410 GET(20.0)-(28.12).D.G 




670 


PUT(76.100)-(84.106).R.PSET 


760 PUT(116.100)-(124.106).T.PRE 


420 GET(30,0)-(38.12).C,G 




680 


PUT(116.100)-(124.106).T.PSE 


SET 


430 GET(100.0)-(104.12).Q.G 




T 




765 'GOTO810 


440 GET(100.0)-(108,6).R.G 




685 


DRAWBM100.100D4" 


770 PUT(84.78)-(92.90).D.NOT 


450 GET(120.0)-(124,12),S.G 




690 


PUT(84.78)-(92.90).D.PSET 


780 PUT(108.78)-(116.90).C.NOT 


460 GET(130.0)-(138.6),T.G 




700 


PUT(108.78)-(116.90).C.PSET 


790 PUT(108.114)-(116.126) .D.NOT 


600 PCLS:SCREEN1.0 




710 


PUT(108.114)-(116.126).D.PSE 


800 PUT(84.114)-(92.126).C.NOT 


610 PUT(100.90)-(108.102).D 


PSET 


T 




810 DRAWBM100.98D8" 


620 PUT(92.90)-(100.102),C.F 


SET 


720 


PUT(84.114)-(92. 126). C. PSET 


820 FOR Z-1TO40:NEXT 


630 PUT(92.102)-(100.114).D 


PSET 


730 


PUT(98.70)-(102.82).Q.PRESET 


830 GOTO610 


640 PUT(100.102)-(108.114).C 
T 


.PSE 


740 
ET 


PUT(98.122)-(102.134).S.PRES 


1000 GOTO1000 











400 
410 


GET(40.0)-(48.12).A.G 
GET(20.0)-(28.12).D,G 


700 PUT(X+8.Y-24)-(X+16.Y-12).C. 
PSET 










l ^ Anr% 




X/ 400 


28 


420 


GET(30.0)-(38.12).C.G 


710 PUT(X+8.Y+12)-(X+16.Y+24).D. 




650 .. 


148 


430 
440 


GET(100.0)-(104.12).Q.G 
GET(100.0)-(108.6),R.G 


PSET 

720 PUT(X-16.Y+12)-(X-8.Y+24).C. 




730.. 


138 




770 .. 


82 


450 


GET(120.0)-(124.12).S.G 


PSET 




END 


53 


460 


GET(130.0)-(138.6).T.G 


730 PUT(X-2,Y-30)-(X+2.Y-18).Q.P 








600 
601 


PCLS:SCREEN1.0 
•PCLS2:PMODE4:SCREEN3.1 


RESET 

740 PUT(X-2.Y+20)-(X+2.Y+32).S.P 








Listing 2: LISUNG2 




602 


'PCLS2:PMODE4:SCREEN3.0 


RESET 






603 


•PCLS0:PMODE4:SCREEN7.1 


750 PUT(X-24.Y-2)-(X-16.Y+4),R.P 


" LISTING2 




605 


X=128:Y-96 


RESET 


2 DIM A(2).C(2).D(2).Q(2).R(2),S 


610 


PUT(X.Y-12)-(X+8.Y).D.PSET 


760 PUT(X+16.Y-2)-(X+24.Y+4).T.P 


(2).T(2) 




620 


PUT(X-8.Y-12)-(X.Y).C.PSET 


RESET 


10 PM0DE3.1:PCLS 




630 


PUT(X-8.Y)-(X.Y+12).D,PSET 


765 'GOTO810 


210 DRAW"BM20.0R4ND12BR4BD6NL8O6 


640 


PUT(X.Y)-(X+8.Y+12).C.PSET 


770 PUT(X-16.Y-24)-(X-8.Y-12).D. 


L4BL4BU6U6":PAINT(22.2) 


PAINTC26 


650 


PUT(X-2.Y-30)-(X+2.Y-18),Q.P 


NOT 


.8) 




SET 




780 PUT(X+8.Y-24)-(X+16.Y-12).C. 


ZZa DRAWBM30.0BR4R4D6NL8BD6BL4N 


660 


PUT(X-2.Y+20)-(X+2,Y+32).S.P 


NOT 


U12L4U6BU6":PAINT(36.2) 


PAINTC32 


SET 




790 PUT(X+8.Y+12)-(X+16.Y+24).D. 


.10) 




670 


PUT(X-24.Y-2)-(X-16.Y+4).R.P 


NOT 


230 DRAWBM100.0R4D6NL4BD6BL4BU6 


SET 




800 PUT(X-16.Y+12)-(X-8.Y+24).C. 


U6":PAINT(102.2).2.4 




680 


PUT(X+16.Y-2)-(X+24.Y+4).T.P 


NOT 


250 DRAWBM120.0BR4BD6NL4D6L4U6B 


SET 




810 DRAW"BM128,92D8" 


U6":PA1NT(122.8).2.4 




685 


DRAWBM128.94D4" 


820 FOR Z-1TO40:NEXT 


260 DRAWBM130.0BR4ND6R4D6L4BL4B 


690 


PUT(X-16.Y-24)-(X-8.Y-12).D. 


830 GOTO610 *>.- 


U6":PAINT(136.2).2.4 




PSET 


1000 GOTO1000 









420 
430 


GET(30.0)-C38.12).C,G 
GET(100.0)-(104.12).O.G 


720 PUT(X-16.Y+12)-(X-8.Y+24).C. 
PSET 










i / 






V 


410 54 


440 


GET(100.0)-(108.6).R.G 


724 GOTO730 






670 78 


450 


GET(120.0)-(124.12).S,G 


725 PUT(X.Y-12)-(X+8.Y).D. PRESET 












727 117 


460 


GET(130.0)-(138.6).T.G 


726 PUT(X-8.Y-12)-(X.Y).C. PRESET 




760 97 


600 


PCLS: SCREEN!. 


727 PUT(X-8.Y)-(X. Y+12). D. PRESET 




END 85 


601 


'PCLS2:PM0DE4:SCREEN3.1 


728 PUT(X.Y)-(X+8. Y+12). C. PRESET 






602 
603 


•PCLS2:PMODE4:SCREEN3.0 
'PCLS1:PM0DE4:SCREEN7.1 


730 PUT(X-2.Y-30)-(X+2.Y-18).O.P 
RESET 








605 


X-128:Y-96 


740 PUT(X-2.Y+20)-(X+2.Y+32).S.P 


Listing 3: LISTING3 


610 


PUT(X,Y-12)-(X+8.Y).D.AND 


RESET 




620 


PUT(X-8.Y-12)-(X.Y).C.AND 


750 PUT(X-24.Y-2)-(X-16.Y+4).R.P 


'LISTING3 


630 


PUT(X-8.Y)-(X.Y+12).D.AND 


RESET 


2 DIM C(2).D(2).Q(2).R(2).S(2).T 


640 


PUT(X.Y)-(X+8.Y+12).C.AND 


760 PUT(X+16.Y-2)-(X+24.Y+4).T,P 


(2) 


650 


PUT(X-2.Y-30)-(X+2.Y-18).Q.N 


RESET 


10 PM0DE3.1:PCLS 


OT 




765 GOTO810 


210 DRAW"BM20,0R4ND12BR4BD6NL8D6 


660 


PUT(X-2.Y+20)-(X+2.Y+32).S.N 


770 PUT(X-16.Y-24)-(X-8.Y-12).D. 


L4BL4BU6U6":PAINT(22.2):PAINT(26 


OT 




NOT 


.8) 


670 


PUT(X-24.Y-2)-(X-16.Y+4).R.N 


780 PUT(X+8.Y-24)-(X+16.Y-12).C. 


220 DRAW"BM30.0BR4R4D6NL8BD6BL4N 


OT 




NOT 


U12L4U6BU6":PAINT(36.2):PAINT(32 


680 


PUT(X+16.Y-2)-(X+24.Y+4).T.N 


790 PUT(X+8.Y+12)-(X+16.Y+24).D. 


.10) 


OT 




NOT 


230 DRAWBM100.0R4D6NL4BD6BL4BU6 


685 


'DRAWBM128.94D4" 


800 PUT(X-16.Y+12)-(X-8.Y+24).C, 


U6":PAINT(102.2).2.4 


690 


PUT(X-16.Y-24)-(X-8,Y-12),D, 


NOT 


250 DRAWBM120.0BR4BD6NL4D6L4U6B 


PSET 


810 ■DRAWBM128.92D8" 


U6":PAINT(122.8).2.4 


700 


PUT(X+8.Y-24)-(X+16.Y-12).C. 


820 FOR Z-1TO40:NEXT 


260 DRAWBM130.0BR4ND6R4D6L4BL4B 


PSET 


830 GOTO610 


U6":PAINT(136.2).2.4 


710 


PUT( X+8 . Y+12 ) - ( X+16 . Y+24 ) . D . 


1000 GOTO1000 


410 GET(20.0)-(28.12).D.G 


PSET 


/R\ 
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BEST PUBLIC DOMAIN PROGRAMS I ) 



FROM T&D SUBSCRIPTION SOFTWARE 



7"cSZ? SUBSCRIPTION SOFTWARE HAS ACCUMULA TED OVER 1. 000 PUBLIC DOMAh 

PROGRAMS FOR THE COLOR COMPUTER. 

WE ARE SELUNG 630 OF THE BEST. JUST THE GOOD STUFF J 



Music 1-7 




8 Utilities & 8 Songs 
17 Musica Filos 
16 Musica Files 
16 Musica Filos 
25 Orchestra Files 
23 .Bin Files Ready To Run 
23 .Bin Filos Ready To Run 



ADVENTURES 1,2 

Each DiskTape Contains 
9 Great Adventures 
Ready To Run jtfS' 

Order A1 Or A2 



..■:■■ 





TELECOMMUNICATIONS 1-3 

ii-L. ui ™. ii;i air.iLr.jiji.- 

T3 - Mikoytor Terminal Package 




EDUCATION 1-4 



E1 - 12 Programs For Young Kids 

E2- 12 Programs For High School Kids 

E3- 11 Programs Teaching The Coco'S Commands 

E4 - 5 Graphics Programs About Australia 



HOME MANAGEMENT 1-4 

■ 12 Programs Each Disk/Tape • 

H1 - Checkbook, Database, Word Processor, + 
H2 - Cash Journal, Investments, Mail List, + 
H3 - Finance, Int. Rates, Stocks, + 
H4 - Spelling Fix, Spelling Checker, ♦ 




GRAPHICS 1-4 

GR1 - 12 Basic Graphic Programs 
GR2- 12 Basic Graphic Programs 
GR3 - 9 Coco 3 Graphic Programs 
GR4 - 22 Coco Max Pictures 
GR5 - 22 Coco Max Pictures 
GR6 - 22 Coco Max Pictures 
GR7 - 15 Coco Max Pictures 
GR8 -22 .Bin Pictures 
GR9 - 22 .Bin Pictures 
GR10 - 14 Large .Bin Pictures 
GR11 -8 Mgo Pictures 
GR12 - Coco Max 3 Pictures 
GR13 - Macpaint Graphic Editor 
GR14 - 5 Macintosh Pictures 



M 



/iss::;: 
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UTILITIES 1-8 

■ 12 Programs Each, 1-4 Require Disk • 

U1 - Backup35, Diskzapr, Romcopy, Timer, + 
U2 - Customize, Diskfix, Disktest, Multback, + 
U3 - Diskaid, Dsklibry, Mldata, Playmac, + 
U4 - Macpix, Stat-Log, Unarc, Unmaster, + 
U5 - Assomblr, Mcbase, Squeezw, Writer, + 
U6 - Chr-Ed3, Hgrcolor, Minidos, Updnlist, *■ 
U7 - Head Print With 30 Mini Pictures 
U8 - Fig Forth Language WithTutiorial 



GAMES 111 

• Each DiskTape Contains 12 Programs • 

GA1 - 3Dlidac, Missle, Poker, Tycoon, + 
GA2 - Chess, Motojump, Rider, Slots, + 
GAS - Battship, Golf, Lander, Robots, + 
GA4 - Abm, Cartel, Subchase, Trek, + 
GA5 - Blackjack, Laser, Raceway, Utopian, + 
GA6 - Kings, Navyguns, Poolgame, Subship, + 
GA7 - Conned4, F-16, Life, Mazeland, + 
GA8 - Chute, Football, Othello, Slither, + 
GA9 - Civilwar, Flight, Prix, Stock, + 
GA10 - Cave, Fly, Pedro, Scramble, + 
GA11 - Bunkors, Craps, Gunner, Nukeattk, + 
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PRICES: 
1- 5 disks/tapes.. ..$6.00 each 

6 or more $5.00 each 

All 53 disks/tapes $145.00 



Name- 



MAIL TO: 

T&D Subscription Software 
' 2490 Miles Standish Drive 
Holland, Michigan 49424 
(616) 399-9648 

Call or write for a FREE catalog ! 



CIRCLE ISSUES DESIRED 




MasterCard 



Address- 
City 



. State- 



Zip- 



. WE SEND 1ST CLASS - NO CHARGE • 
• PERSONAL CHECKS WELCOME ■ 



CredilCard ff. 
Expires 



TOTAL AMOUNT $ 
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GR12 
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GR13 
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TAPE 




DISK 



Please turn to pages 29 & 75 for our Subscription Software! 
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CoCo 1 , 2 & 3 



Eagle Keyboard and Interface — 
Touch the Eagle 



When asked to review the Eagle key- 
board and interface, I was very excited. I 
have wanted to drive one around the block 
for quite some time now, and this was my 
opportunity to try one out. That afternoon I 
rushed home with the package, anxious to 
get it installed. (Of course the fact that it 
was a Friday could have had something to 
do with it as well.) 

A short while later at my apartment 
building. I quickly zipped in the door, threw 
on the lights, and dropped everything on 
the kitchen table. Clearing out a path through 
the yet-unpacked boxes. I finally reached 
my destination, disconnected the CoCo 
and gently carried it to the kitchen table, 
clearing off a work area. Unpacking the 



Eagle keyboard and interface. 1 noticed that 
it was packaged very well and should with- 
stand the normal pressures of shipping across 
the country. 

The documentation, however, leaves a 
little to be desired. It was originally printed 
on a dot-matrix printer, and the photocopy 
supplied is a little difficult to read. The 
documentation does not specify which of 
the three wires is ground and which is 
positive. However, I didn't have much 
trouble figuring it out. The ground wire has 
a large uninsulated alligator clip, and the 
positive wire has an alligator clip with red 
insulation. 

A few days later I received an updated 
version of the documentation that is much 



better than the original. It is much easier to 
read and provides a very simple twelve- 
step installation guide. The new documen- 
tation explains how to install the interlace 
using the alligator clips to verify that the 
keyboard works properly. When you are 
certain the keyboard works, you are told to 
remove the alligator clips and solder the 
three wires to the motherboard. 

The guys at Arizona Small Computers 
also threw in a little humor in the documen- 
•tation. Instead of saying, "You may dam- 
age the CoCo." they say, "We all know it is 
smoke that makes these circuits work. We 
know this because when we let the smoke 
out of an electronic device, it no longer 
works." 

Installation is straightforward and should 
be easy for the novice. However, I did have 
two minor problems. Getting the mylar 
cable connected into the keyboard socket 
requires a steady hand to ensure the pins are 
centered in the connector. I suggest that 
you examine it twice before powering up. 



92 



THE RAINBOW January 1990 



just to make sure none of the pins are 
touching other pins. Also, you will notice 
that the plastic post in the center is in the 
way and doesn't allow the interface board 
to lay flat. If you are installing the keyboard 
interface permanently, you may want to 
remove that post with a pair of snips. This 
way you can install the old keyboard to fill 
the large hole in your CoCo. 



A AUDIO 


B 


BACKUP 


C COPY 
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DATA 


E EDIT 
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FREE 


G GOTO 
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HEX$( 


I INPUT 
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JOYSTKC 


K KILL 


L 


LOAD" 


M MID$( 


N 


NEW 


OPEN 


P 


PMODE 


Q EXEC 


R 


RENAME" 


S SAVE 


T 


TIMER 


U UNLOAD 


V 


Display Version 


Table 1 


Enhanced Kev 


Definitions for BASIC 



Ah. now on to the fun. Putting the CoCo 
back together, I gently carried it back to the 
computer desk and powered it up. The 
following menu was on the screen: 

(1.) 0S9 LI 

(2.) 0S9 L2 

(3.) EXIT TO BASIC 

(4.) 0S9 RUN "BOOT" 

(5.) BASIC RUN "BOOT" 



The first option configures the keyboard 
for OS-9 Level 1. and the second option 
configures the keyboard for OS-9 Level 2. 
Both automatically issue a DOS command 
to boot OS-9. The third option configures 
the keyboard for BASIC and exits to BASIC. 
For those without the DOS command. Op- 
tion 4 configures the keyboard for OS-9 
Level I and then issues the RUN "*" com- 
mand to boot OS-9 Level 1. Option 5 
configures the keyboard for BASIC and then 
issues the RUN "BOOT" command so you 
may automatically load any disk utility. If 
you don't press a key for five seconds. 
Option 2 is automatically selected. 

According to the documentation, you 
can press the space bar upon power-up to 
bypass this menu. This is especially useful 
if you are using an auto-boot EPROM with 
such products as Disk Master. Burke & 



Burke, Eliminator, etc. Out of curiosity I 
installed the Eliminator, and the system 
immediately booted into OS-9 Level 2 with 
the keyboard configured for OS-9. 

The keyboard offers a very useful short- 
hand method of entering commands by 
pressing and releasing the ENHANCE key 
followed by an alphanumeric key. Under 
BASIC the enhanced keys are defined as 
shown in Table 1 . 

Also, the (SCROLL LOCK) key emulates 
shift-@ to pause the screen any time it is 
pressed. Unfortunately, it doesn't function 
the same under OS-9. As a handy addition 
for BASIC users, you can press ENHANCE-4 
and have automatic key repeat. 

The enhanced key definitions for OS-9 
are shown in Table 2. 

You can define the function keys F17 
through F24 to contain anything you desire. 
The only limitation is that the total number 
of characters in F17 through F24 cannot 
exceed 60 characters. If you have Kevin 
Darling's SCF patches to allow line editing, 
the INS and DEL keys function the same as 
CTRL-right arrow and CTRL-left arrow. The 
fi and F2 keys on the keyboard function the 
same as the Fi and F2 keys on the CoCo 
keyboard, and F3 through F24 are the same 
as ALT-A through alt- v unless you redefine 
them. 



A Attr 


B Backup 


C Copy 
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E Echo 


F Format 


G Free 


H Help 


I Ident 


K Kill 


L Load 
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0S9Gen 
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S Save 
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X XMode 


Z Deiniz 




Table 2: 


Enhanced Key 


Definilions for OS-9 



If there is a single option to the keyboard 
that really stands out above any other, it is 
the CTRL-ALT-DEL key combination. When 
these three keys are pressed simultane- 
ously, the system performs a complete reset 
exactly as if you had pressed the Reset 
button. 

Overall I like the keyboard, but it does 
have a few quirks. Its approximately 124 
keys, which are scrunched into the same 



space as an enhanced 101 -key keyboard, 
will take a little time to get used to. I really 
like the two distinct "feels" of the keys. For 
touch typists, the stroke is so light that you 
can almost breathe on the keys to press 
them — which I can really get into. If you 
don't care for a light stroke, you can press 
a key down approximately one-eighth inch 
to get a firmer stroke, which I think is a nice 
touch. 

Being used to a Chicony enhanced 101- 
key keyboard. I find the layout of the Eagle 
keyboard a little cramped, but it does have 
some nice features. Even so, I have become 
quite accustomed to the layout of the Eagle 
keyboard. Best of all, it has allowed me to 
move my CoCo out of the way. 

(Arizona Small Computer Peripherals, 930 
W. 23rd St., Tempe, AZ 85282, 602-829- 
8028; $125 plus $8 S/H) 

— Greg Law 
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CoCo 3 



Data Form III — 
CoCo 3 Database 
Management 

If you have a lot of information to 
manipulate, give Data Form 111 a look. 
Data Form 111 is a database manager that 
allows a maximum of 1 7 fields per file and 
up to 249 spaces for each field. It creates 
new database programs from the informa- 
tion you supply, i.e.. the names of the fields 
and their lengths. This new program is then 
stored on a blank disk, along with the 
information you later enter into it. You can 
enter up to 1 000 characters for each record 
in the file. 

The program comes on a non-protected 
disk and the user is encouraged to make a 
backup copy for his/her use. Because it is 
written in BASIC, it runs more slowly than 
would a machine language equivalent. 
However, because it is in BASIC, it is easily 
modified. The disk comes with an informa- 
tive manual/tutorial that describes not only 
how to use the program, but also discusses 
databases in general. The program is very 
"E.Z." and user-friendly. 

The program is set up to work only with 
blank, formatted 35-track disks for data. 
You'll need a blank, formatted floppy disk 
for each database you create. Data Form III 
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works best with two or more drives, so you 
don't have to swap disks; however, one 
floppy drive will work too. 

Data Form III works fine with a RAM 
disk installed, which greatly speeds up 
sorting and searching. However, if you use 
a RAM disk, you must be certain that you 
back up the file before quilting. When you 
choose the Quit option, the computer does 
a cold start. 

Data Form III works with ADOS as well 
as with Disk basic, and it features auto- 
matic upper- and lowercase letters for text 
entry into your file. The user can make 
backups of data while in the program. 

The Organize (sorting) command ma- 
nipulates the information on the disk using 
only your original file, rather than creating 
another indexed file. This way. more infor- 
mation can be stored on the disk. As you 
can imagine, there is a lot of disk access 
during sorts. A large database can take a 
while to sort. Hopefully you won"! need to 
do it often! The results display onscreen as 
the sorting takes place. One of my pet 
peeves has always been that computers 
don't sort numbers "correctly." Data Form 
HI does! For instance, 3 comes before 14. 

Searches must be performed for exact 
matches. For example, if you know the 
word Computer is in your file, you must 
search for Computer, not computer. How- 
ever, you could search for Com and find 
Computer. Searches can be on a particular 
field or the entire database. 

The screen is an attractive blue, with 
light-colored text. You can choose either a 
40- or 80-column display. 

If you decide to print all your files, the 
printout includes the names of the fields as 
well as your input data. There is a menu 
choice to change your printer's baud rate. 
Data Form III also prints labels — standard 
five-line labels or non-standard labels. 
However, you can't input the quantity of a 
particular label you want to print. 

A short, sample database, which the 
user can type in, is included in the manual. 
There is room for 47 1 fileson the disk using 
this tutorial as an example. It includes nine 
fields with 308 characters. 

I set up a name and address file consist- 
ing of Last Name (with a maximum of 15 
characters). First Name (10 characters). 
Street (20 characters). City (15 letters). 
Stare ( 1 5 letters), ZIP Code ( 1 characters). 
Telephone Number (15 characters), Birth- 
day (17 characters), and Anniversary (17 
characters) for a total of 134 characters. 
The program informed me there was room 
on my disk for 1305 files. 

There is no warning when you reach the 
maximum number of characters allowed in 
a field. The program just cuts off any extra 
letters or numbers. 



Data Form III is a good choice for the 
Color Computer 3 user who has a lot of 
information to store. It devotes an entire 
disk for each database the user creates. 

(E.Z. Friendly Software, 118 Corlies Ave., 
Poughkeepsie, NY 12601, 914-485-8150; 
$19.95 plus $1.50 S/H) 

— Lee Deuel I 
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Studio Works — 
A Sound Studio 
in 512K 

Inside a soundproof studio you listen to 
the din of a rush-hour crowd emanating 
from Cerwin Vega speakers. Sidewalk 
vendors hawk their wares at passing pedes- 
trians. You wince as tires screech to an 
abrupt halt. Then suddenly you are trans- 
ported to a place where water laps onto the 
shore and gulls circle overhead. In the 
distance, barely audible, the fading echoes 
of police sirens are drowned out by a crash- 
ing wave. 
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These sounds and more can all be saved 
to disk using Oblique Triad's astonishing 
program Studio Works — a digital sound 
editing system for the CoCo 3. Require- 
ments include a CoCo 3 (512K is recom- 
mended to fully explore the capabilities of 
this package), disk drive, standard joystick 
or mouse, and a sound source adapter cable. 
The cable can be ordered with the package, 
or you can choose to build one using the 
schematic in the manual. A Maxsowd cable 
works, also. 

A digital sound editing system allows 
you to sample (record) audio signals and 
rearrange them by cutting, pasting, dub- 
bing, overlaying, reversing and changing 
the sampling rates (speed) originally set 
when capturing the sounds. 

I got Studio Works up and running with 
a couple of samples captured in a few 
minutes' time. The cable to record sound 
connects to the left joystick port and to any 



sound source with a 1/8-inch phone jack 
output. With the purchase of a connection 
adapter available at most electronics parts 
stores, the I /8-inch end can be adapted to 
receive output from other sources or ster- 
eos with RCA jacks. 

Capturing a sample is easy and can be 
accomplished on the main screen where 
sample waveforms are displayed and edit- 
ing is performed. Use your joystick or 
mouse to select a sound source, recorded or 
live. Next make proper volume adjustments 
on the displayed VU meter and click to 
select one of two recording functions. If 
you do not reclick or release the recording 
function, the sample continues recording 
until available memory is consumed. 

Once you have a sample in memory, the 
fun begins. I had friends laughing when I 
sampled their voices — then sped up the 
sampling rate until they sounded like fren- 
zied chipmunks. If you're looking for hid- 
den messages on records, stop wearing out 
your stylus: Sample the measures in ques- 
tion, reverse the sample and then sit back 
and realize how much time you've been 
wasting. 

To recreate my opening scenario, take a 
portable cassette recorder to a busy street, 
tape five or 10 minutes' worth of action, 
then repeat the same process at the beach. 
Bring the tape home and sample the best 
sections of tape. Two samples can be viewed 
for simultaneous editing. Load your beach 
sample into the upper editing block, then 
block the desired section of sample and 
copy it to clipboard A or B. Next load your 
city sample into the lower editing block and 
set the lower editing block markers where 
you want to paste the beach sample, which 
still rests in the clipboard. Select the clip- 
board where your beach block is located 
and click the Paste option. 

The act of pasting erases or records over 
underlying sections of sample. The cursor 
changes from an arrow to the letterP. Using 
a joystick or mouse, move this P inside 
your blocked section of city sample and 
click. Your beach sample has now been 
edited into the city sample. You have fin- 
ished with the upper editing block contain- 
ing the beach sample. 

Next, block and copy a distinct sound 
from the city sample into the vacant clip- 
board. Block the latter beach sample sec- 
tion and choose the Overlay option to re- 
trieve the city sample in the clipboard. The 
cursor changes to an O. Move this cursor I 
inside, the blocked beach sample and click. ♦ 
Repeat these overlay steps, moving the : 
cursor a little to the right each time. The 
result is an echo of city sounds over beach 
sounds. Voila. your new sound creation is 
complete. 

The possibilities are vast. Programmers 
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Jeff Noyle and Dave Triggerson have de- 
veloped a very user-friendly program. With 
the exception of typing in sample names, 
all functions are executed via clicking and 
dragging. Saving samples to disk or storing 
them in memory using the sample archives 
is a cinch. The disk drive is not accessed 
when using the archives, which keeps sample 
swapping to a minimum. Samples can be 
quite large, sometimes requiring over 68 
granules of disk storage space. Sample files 
have managed to nudge their way past Hi- 
Res graphics in the memory hog trough. 
Fifty-six 8K blocks are available for memory 
storage when using a 5 12K CoCo. 

When at the sample archive screen, each 
file can be played by pressing the desig- 
nated key. If you want to hear all samples 
played consecutively, a sequencer option is 
supplied. 

Two of the most useful features in this 
package are the options to save samples for 
use with basic or machine language pro- 
grams. Programming directions are in the 
manual, explaining how to incorporate your 
samples into other programs. An example 
of this feature is in the opening segment in 
Oblique Triad's new graphics adventure 
game, The Seventh Link. 

I found Studio Works a delight and 
commend its development. Musician friends 



have gazed over my shoulder, envious of a 
30-second sample. Oblique Triad is estab- 
lishing itself as an innovative company in 
the CoCo Community. Give this program 
serious consideration as an addition to your 
CoCo library. 

(Oblique Triad, 32 Church St., Georgetown, 
ON L7G 2A7, Canada,4I6-877-8149; $54.95 
U.S. or $64 Cud. with cable; $39 U.S. or $49 
Cnd. without cable) 

— Tonv Olive 



OS-9 



1 Softw are^ 

File System Repack — 
Disk Defragmenter 

After setting up a hard drive, your first 
inclination is to load it up with everything 
but the kitchen sink. However, managing a 
hard drive is quite different from using 
floppy disks. One of the major problems 
with any disk — • hard or floppy — is what 
is known as disk fragmentation, or, in other 
words, inefficiencies that develop in the 
way files are stored on the disk, such that 
the disk drive has to work harder (and 



longer) to retrieve a file. 

As an example, suppose I start up my 
favorite word processor (DynaStar) and 
begin typing this review. Let's say I com- 
plete half of it tonight. When saved to disk 
the file takes up 10 sectors of space; OS-9 
finds 10 sectors and saves the file. The next 
night I write another 10 sectors of review, 
and when it is saved OS-9 must look for 10 
additional sectors somewhere on the disk 
— and these are probably not contiguous 
with the first 10 sectors. A file stored in this 
manner is called a fragmented file. 

So what, you say? Well, one result is 
that the disk head must move around the 
disk to read these groups of sectors, obvi- 
ously causing more wear and tear on the 
drive and lengthening the time it takes to 
load the file. Magnify this many times 
along with file deletions, and before you 
know it there are parts of files all over the 
disk. Now. I know this is an oversimplified 
view of fragmentation (I can hear the pur- 
ists rolling on the floor with laughter); but 
you can read about the technical details in 
a number of articles, some of which are 
noted in File System Re/jack's manual. 

File System Repack is a collection of 
disk utilities from Burke & Burke that help 
you maintain a healthy disk system. Al- 
though they work on both floppies and hard 



Programs for Home or Classroom 

Educational Programs for Students Grade K-12 
and Adult Self Studies 



More than 500 programs on cassette for any Color 
Computer! At every level from kindergarten through 
adult. All have full-time narration! 

Send for our FREE catalog of over 1,000 Dorsett 
educational programs for Atari, TRS 80, Apple, IBM 
PC Jr., Commodore, Tandy 1000, etc. 

16 Programs in each of the following 

Children's Tales — Reading — Arithmetic 

Fractions — Algebra — Geometry 

Accounting — Psychology — MUCH MORE! 

New courses in Spanish and geography. 

CASSETTES: $59.50 for an album containing a 16- 
program course (8 cassettes with 2 programs each); $9.95 
for a 2-program cassette. 

DISKS: $14.95 for a one-program disk; $28.95 for two 
disks; $48.95 for four disks. All disks come in a vinyl album. 

For more information, or to order call: 

TOLL FREE 1-800-654-3871 

IN OKLAHOMA CALL (405) 288-2301 



MojImCard 



VISA- 



[2) DORSETT 

^■i^^r Educational Systems, Inc. 
Box 1226, Norman, OK 73070 

Dealer Inquiries Welcome 



. BYTE BACK 
AT TAXES 
WITH TRY-O-TAX 

• available for CoCo, MSDOS, TRS-80 



revised for '89 law changes 



prompts for easy guided use 



calculates 1040, 1040A, 2441, 2106, 6502 



calculates schedules A-F, SE 



computer generated substitute forms 



FREE TAX ESTIMATE PROGRAM 



PERSONAL SHORTFORM ALONE 315.00 NO CREDIT 

HECKS WELCOME CARDS, CO.O. 

Q Q SHIPPING 



$44 



TRY-O-BYTE, 1003 Alton Circle, Florence, S.C. 29501, (803) 662-9500 

— order 1-800-476-4265 only— ' 
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drives. File System Repack' s utilities are 
meant primarily for hard drives. The utili- 
ties contained in the package provide the 
user with the tools needed to reduce or 
eliminate fragmentation: 

HDB and HDR — hard disk backup and 
restore, respectively. 

CCheck — scans a disk for defective 
sectors and identifies any files stored in 
defective areas of the disk. 

Stash — marks files or directories that 
should not be repacked. STASH can also be 
used as a security tool to hide files. 

Zap — erases a file's directory entry 
without deallocating sectors. 

Repack — optimizes a hard disk by 
merging file segments and reorganizing 
disk storage. 

BA — sets allocation bit map bits for a 
specified Logical Sector Number (LSN) or 
for a range of LSNs. 

BD — clears allocation bit map bits for a 
specified LSN or for a range of LSNs. 

In addition to the above utilities you 
need DCheck from the OS-9 system disk. 

To repack a disk there are three basic 
steps to follow as outlined in File System 
Repack' s documentation: 

dcheck -bp /ho 
ccheck -ap /hO 
repack /hO 

With such a simple procedure. I figured 
even 1 could follow this. Having never used 
DCheck, 1 didn't know what to expect and 
redirected output to the printer so that I 
would have a record. 

After a bit of whirring and grinding of 
the disk drive, the printer came alive and 
printed about a page of messages followed 
by a final message that said, "File structure 
not intact!" There 1 sat muttering to myself 
(everyone else in the family thought I was 
crazy) — how can this be? There hadn't 
been any problems with the disk drive. 
Furthermore, the documentation says not 
to proceed if the above message is obtained 
— but it doesn't tell you what to do! 

Then I looked over the messages and 
noticed that DCheck was complaining about 
two commands that are in both /hO/CMDS 
and /hO/APPL. It hit me — 1 had linked the 
two commands using a disk Link com- 
mand. Anticipating this would cause a 
problem with CCheck and Repack, I re- 
moved the links before continuing. 
Rerunning DCheck resulted in the "File 
System Intact" message. 

Continuing to the second step, the docu- 
mentation warns that CCheck takes several 
hours to run on a 20-Meg hard drive. This 
is because the program "non-destructively 



reads and writes every sector of the hard 
disk, marking off bad sectors and reporting 
the names of files stored in bad sectors." If 
there are any bad files, they must be re- 
moved using the Za p command. On my 20- 
Meg hard drive CCheck took about 4Vz hours 
to accomplish its task. When finished it 
reported "Integrity check of /hO passed — 
processed 688 files, 41 directories." 

OK! — two-thirds of the way finished. 
Now for the big step — Repack. According 
to the manual, a half-full, badly fragmented 
20-Meg hard drive can take 10 or more 
hours to repack. Apparently my quarter- 
full disk was not badly fragmented because 
it took only two hours to repack. It is 
important to note here that the limiting 
factor in this process is the 2 MHz 6809 and 
numerous reads and writes which must 
take place. It is not a problem with the 
software. 

That's it! Although time-consuming, it 
is a simple process to repack a hard disk. 
The manual provided with the software is 
clearly written and easy to follow. Each of 
the commands have additional options for 
specific needs — or to satisfy the true 
hackers. For us mere mortals the above 
procedure gets the job done just fine. In 
addition, an appendix provides additional 
detail about the OS-9 disk file structure and 
fragmentation. 

At about the time I received File System 
Repack for review. I had an opportunity to 
see a demo of a similar package for the MS- 
DOS operating system called PC Tools. 
One of the things that impresses me about 
this MS-DOS package is the graphical inter- 
face that shows (he disk fragmentation and 
how the repacking progresses. Unfortu- 
nately, this graphics feature is not provided 
with Repack. However. I have a public 
domain program. Dam (author unknown), 
that graphically shows the fragmentation 
of the disk. I ran this program before and 
after using Repack and was pleased to see 
all of the disk files nicely packed on the 
disk after Repack did its work. I encourage 
Burke & Burke to come up with a similar 
utility — a picture is worth a thousand 
words! 

Burke and Burke's File System Repack 
is an excellent package and a must for all 
hard drive users. Sufficient flexibility is 
incorporated in the utilities to meet a wide 
range of needs. As I noted above, the proc- 
ess is simple enough that novice OS-9 users 
should have no trouble performing disk 
housecleaning. even if they don't fully 
understand all the technical details of disk 
fragmentation. 

(Burke & Burke, P.O. Box 58342. Rcnton. 
WA 98058, 800-237-2409; $29.95) 

— Donald Dollberg 
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Treasury Packs 
#1 and #2— 
The Making of a 
Closet Gamist 

I had the devil's own time doing the 
reviews for Treasury Packs #1 and #2. 
Every time I loaded a game, I'd hear a 
chorus of "Let me play, let me play!" It got 
so bad, I was turning into a closet game 
player. (Are the kids outside? Or in school. 
maybe? Good! Then I can play without 
anybody taking my joystick from me!) 

I'm not a seasoned arcade gamist. I hate 
to waste quarters dying in the first screen of 
a game I don't know how to play. These 
Treasury Packs suited me just fine. The 
Packs are sold separately, at a price of 
$29.95 for each disk. Each disk is packed 
with favorite games (#/ has eight games, 
#2 has seven), all of which were originally 
marketed by Spectral Associates and sold 
separately for $24.95 to $28.95 at that time. 
Most all of these games are recognizable as 
arcade classics, and Microcom Software 
bought the rights and now distributes them 
in these collections. The instructions are all 
the original docs printed out by Spectral, 
and I don't really think the fact that one set 
is printed on pink paperand one set on blue 
has anything to do with who can play what 
games. 




About the only thing I think could have 
been clone differently is the docs for Treas- 
ury Pack if 1. While they are all there. I feel' 
they could have been arranged in a more 
organized manner. I was a bit confused on 
the order of the instructions and called 
Microcom. The people there assisted me in 
putting the docs in order, and 1 found them 
quite patient and willing to help. Microcom ■ 
guarantees its disks to load, and if some- 
thing happens to a disk while en route to 
you, Microcom will replace it. 

1 (and my children) tested all of the 
games on these Treasury Packs on a CoCo 
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A New High 

In Printer Performance! 



MULTI-FONT PRINTER 

^ Now a Blazing ^-^ 
180 characters >- 




The NX-1000II gives you 
plenty ol print options ior 
attractive printing. 
Four typestyles. 
Four pitch sizes, 
in standard 




and italics 

tor a total 

ot32 

NLQ 

modes. 

The NX- 

1000 Rainbow 

gives you all these features plus 

online access to 7 color printing and graphics. 

Black, blue, red, yellow, green, violet, and 

orange. Both models have a 1 year warranty 

and a 30 day online trial. 



NX-1000II SPECS: lBOcpsDralt, 42 cps NLQ (18x23 dotmalih). 
4 NLQ Fonts. Italics, Sub S Supetscnpls. Emphasized, Dou- 
blestrike, Proportional. Condensed, International. Downloadable, 
Quad Tall. Double Tall. Undorline.9' Pilcns, Forward and Reverse 
rV2!6" Line Feeds. Absolute or Relative Ven. & Horz. Tabs, Lell, 
Center or Right Justification. 8 Graphics Modes to 1920 dpi. Macro 
Instruction, Bidirection, Adjustable Tractor Feed. 200i Printable 
Characters. Somi Auto Sheet Feed, Front Panel Soft Touch 
Control, Epson and IBM Emulate, 4k Dala Butler, He< Dump. 
NX-1 000 Rainbow: 1 44 cps Draft. 36 cps NLO, rest same as NX- 
tOOOII plus color 
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NX-1000II SYSTEM INCLUDES: 

• Star NX-1 000II Printer $OAQ 

• Blue Streak Ultima ^UO 

• Software Support Trio +S10 Shipping 

COMPLETE 



NX-1 000 RAINBOW SYSTEM 

INCLUDES: $OAQ95 

• Star NX-1 000 CVZf 
Colour Printer +* 10 Sni PP' n 9 

• Blue Streak ^^COMPLETE 

• Software Trio 

• Color Super Gemprint 



The Smallest, Sleekest, 
Fastest Serial To Parallel 
Converter You Can Buy! 

7 Switchabel Baud Rates 

300 • 600 '1200 -2400 • 
4800-9600-19200 

Use this "smart" cable to con- 
nect a Centronics parallel printer 
to any version CoCo or use it to 
improve performance of your 
current printer. The 
cables are long-life, high 
quality shielded cables 
with moulded plugs for 
extra durability. 

Try a Blue Streak Ultima on 
your system for 30 days RISK 
FREE. One year warranty. 

The Blue 

Streak Ultima 
$3995 



Powered version 
add $6.00. 



+S2 Shipping 




"^ FREE 

with purchase ol any 
NX-10OO System 

tANCS 




Software 
Support Trio 

Type Selection/Tutorial 

Online instructional program that will select 24 
special features of your printer or display meth- 
ods to incorporate them into your 
programs. 

Super Gemprint 

Will transfer Pmode 0, 1 , 2, 3, or 4 picture screen 
to printer 8"x11" hardcopy. Black/white, white/ 
black or grey level shading for color. 

Hi-Res Super Gemprint 

Disk software that will transfer a Hscreen 1,2,3, 
or 4 picture screen to printer. Grey level shading 
for color. 

-jts/Wu^ All Three 
Programs 

$-|Q95 

Color Super 
Gemprint 

Print your Graphics Screen 
in Color on your NX-1 000 
Rainbow! 



Use your favorite program to create a 
pmode or hi-res graphic image, but 
don't stop there! Run our color graph- 
ics software and print a color image 
using a palette of 81+ colors on your 
NX-1 000 Rainbow from a CoCo 1 , 2, 
or 3. Requires 32k ECB Disk. 





Price, availability and specifications 
subject to change without notice. 



Order Your System Today... Call (513) 885-5999 



DAYTON ASSOCIATES "X?, INC. 

9644 Quailwood Trail • Spring Valley, Ohio 45370 

Shipping charges la Canada, P.R., HI. AK, APO, FPO are double. Triple charge lo all olher countries. 



Visa & Master accepted within 

the continental U.S. 

Ohio residents add 6.5% sales lax 

COD add $3.00 



2, then I look them (the packs, not the kids) 
to our users group meeting and tested them 
all on a CoCo 3. Joysticks are required for 
most of these games but optional for some. 
32K is required, except for Roller Control- 
ler, which is the only game programmed 
exclusively for a 1 28K or higher CoCo 3. 
Now. let me break down the Treasury 
Packs and tell you a little bit about the 
games on each. 

Treasury Pack #1 . 

Keys of the Wizard — This is a text 
adventure game (there's one in each of the 
packs) with three different skill levels. The 
higher the skill level, the more treasures are 
hidden and the more traps are active. As 
you go through the mazes and wind your 
way among the paths, you encounter eight 
creatures that either try to kill you or help 
you. There are 32 treasures, which you 
must find and take to the sanctuary (hidden 
within one of the mazes) to win the game. 

Unlike some games where you can carry 
everything at once, this game seems to go 
by weight — so the heavier the objects, the 
less you can carry. All the objects and 
creatures are randomized so a game doesn't 
play the same way twice. 

Definitely make a map for this one, as 
forest floors can collapse on you, plunging 
you into underground caverns. You'll use 
commands like READY and UNREADY to pre- 
pare your weapon, REST to build up strength 
points (which diminish as the game goes 
on),and QUIET, which acts to pause the 
game. Oh, and don't try to quit or save a 
game. You have to UNCLE and then the game 
will save only to tape, even if you are using 
the disk version. 

Lunar Lander Rover — This game is 
known in arcades as Moon Patrol. Your 
mission is to maneuver a lunar rover, ex- 
ploring the 26 sectors mapped on the moon. 
Since you're on the moon, you see the earth 
up in the sky, and of course there are craters 
and boulders. There is also an alien force 
(the men in the moon?), trying to prevent 
you from completing your mission. They've 
planted mines in some of the sectors and 
shoot at you from the sky. You have to blast 
them, jump the craters, jump or blast the 
boulders, and make your way through. The 
graphics in this game are the full, filled-in 
type, not just drawn-in outlines, and it takes 
practice to even make it halfway through. 

Cubi.x — This, of course, is Q-Bert — 
the little guy that jumps from block to block 
on the pyramid, avoiding snakes and such 
and definitely trying not to fall off the 
pyramid. An added bonus with this game is 
the sound capability if you have a Speech/ 
Sound cartridge installed. 

Module Man — The Speech/Sound 
package is optional in this one. As Module 



Man, you have to find the magic sword and 
return it to the king. There are 25 objects 
scattered throughout 15 screens, including 
a secret screen. The monsters (of course!) 
are trying to kill you as you touch or pick up 
these objects, and you can't get to the next 
screen until you've gotten all the objects 
and killed all the monsters in that screen. 
You really have to do some searching to 
find the secret doors, and some fancy run- 
ning, jumping and climbing to get through 
this game. 



D. 



recathlofi isn't a game 
you want to play to 
relieve your tension. Just 
as in the Olympics you 
participate in 10 
different track and field 
events, not advancing to 
the next event until 
you've qualified in the 
previous one. The 
keyboard controls the 
player in this one. 



Qiks — If you have the Speech/Sound 
pack, you can also use it in this game. Qiks 
is more a game of strategy than luck. You 
claim territory by drawing in lines with the 
joystick, which controls the cursor. On the 
screen, moving around, are sparks and a set 
of lines. If the sparks run into you. you die. 
If the set of lines runs into the line you're 
drawing, you die. The object is to get as 
much space on the screen filled in as pos- 
sible. When you have 75 percent or more 
filled in, you move on to the next screen, 
with points being awarded for the amount 
of filled-in space. 

Roller Controller — This is the only 
game out of the two Treasury Packs made 
exclusively for the CoCo 3. and it works 
with either an RGB or composite monitor 
(or TV set). The object is to guide the 
rolling marbles into the bins of the corre- 
sponding color at the bottom of the screen. 
To gel the marbles where they are supposed 
to go, you have to open and close trap 
doors. If the marbles fall out of playing 
range, fans located in the bottom corners 
blow them back to the lop of the screen. The 
best way to describe this game is as a cross 
between a pinball game and a maze. 

Pengon — a.k.a. Pengo in the arcades. 
You're a little penguin playing around in 
the middle of a stack of icecubes. Using the 
joystick, you push the ice cubes around, 
crushing them, or push them on top of the 



beasts (apparently penguin-haters) to crush 
them. It's simple enough, and more fun if 
you pretend the beasts are people you don't 
like very much! 

Decathlon — This isn't a game you 
want to play to relieve your tension. '•■ as 
in the Olympics you participate in i f- 
ferent track and field events, not adv g 

to the next event until you've qua!. l 

the previous one. The keyboard c . ■ <s 
the player in this one, and you ge; ;,iree 
attempts to qualify for each. I must .<mit, 
I never made it past the shotput (Eve : #3). 
This challenging game can be played "y up 
to four players at once. It saves >ny to 
cassette, even with the disk version 

Treasury Pack #2 

Galagon — This is an arcade ..: X)t- 
'em-up game that works with the Speech/ 
Sound pack also. A joystick is requ.' ;d io 
control your spaceship. The objeo: is to 
shoot all the aliens that are diving toward 
you, shooting as they go. The aliens start 
out in formation but then break oii for 
individual attacks. 

Lancer — Also known as Join s 
game can be played by one or t wo p! _ . . rs. 
You are a little knight on a horse, t ■. •'••>'• io 
destroy the enemy with your lance. st 

to this game is that once you kill an v- , : y, 
it can resurrect into a new rider. Ti ■ re ;tre 
lava pits to avoid.disappearing islai ■ !sa : I. 
of course, a dragon to slay. It's all in day's 
work for your little knight, though 

Froggie — ■ Even a preschoo 1 r will 
recognize the popular Frogger game. 
Choose your weapon (joystick or ke; -ward) 
and guide your frog across the busj street 
and then across the pond to his home A 
lady frog floats on one of the logs .nd she 
really appreciates it when you rest je her. 
Crocodiles, snakes and otters mat i your 
trek toward home more dangerous, jrtd the 
diving turtles always want to ta) • you 
underwater with them. One or two , layers 
can play this, taking turns jumping their 
frogs to safety. Oh, and there is c pause 
feature in Froggie allowing you to take a 
break. 

Ms. Gobbler — Why. it's Ms. Pat Man 
in disguise! This maze game (for one o: two 
players) has you gobbling all the little food 
dots in your path. Eating one of th ■ four 
energizerdots gives you the strength (o kill 
the ghosts who are relentless in pursuing 
you as you eat. In case the ghosts gang up 
on you, or you've eaten everything ad the 
bottom of the maze and need a few Iron the 
top, you can use the teleportation spot, 
which transports you back to the lop of ihe 
screen. For those who think this game is too 
simple, try the "inviso-maze" option . . . 
you have no walls to guide you. 

Ice Castles — Another one- oi iwo- 
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The Biggest 

The Best 

The indispensable 




CCLOR COMPUTER MONTHLY MAGAZINE 



THE RAINBOW is the biggest, best, brightest and 
most comprehensive publication a happy CoCo 
ever had! THE RAINBOW features more programs, 
more information and more in-depth treatment of 
the Tandy Color Computer than any other source. 

A monthly issue contains nearly 200 pages and 
up to two dozen programs, 14 regular columns and 
as many as 12 new product reviews. And advertise- 
ments: THE RAINBOW is known as the medium for 
advertisers — which means every month it has a 
wealth of information unavailable anywhere else 
about new products! Hundreds of programs are 
advertised in its pages each month. 

Every single issue of THE RAINBOW covers the 
wide spectrum of interests in the Tandy Color 
Computer — from beginners' tutorials and arcade 
games to telecommunications and business and 
finance programs. Helpful utilities and do-it- 
yourself hardware projects make it easy and fun to 
expand your CoCo's capabilities. And, monthly 
reviews by independent reader reviewers take the 
guesswork out of buying new software and hard- 
ware products. 

Join the tens of thousands who have found THE 
RAINBOW to be an absolute necessity for their 
CoCo. With all this going for it, is it surprising that 
more than 90 percent of THE RAINBOW subscrib- 
ers renew their subscriptions? We're willing to bet 
that, a year from now, you'll be doing the same. 



Rainbow On Tape 

& Rainbow On Disk! 



— great ways to bring THE RAINBOW into your life. 
Each month, all you do is pop the tape into your 
cassette player or the disk into your drive. No more 
lost weekends. As soon as you read an article about 
a program in THE RAINBOW, it's ready to load and 
run. No work. No wait. 

Just think how your software library will grow 
With your first year's subscription, you'll get almost 
250 new programs: games, utilities, business 
programs, home applications. And, with RAINBOW 
ON DISK, you'll also get all the OS-9 programs. 

RAINBOW ON TAPE and RAINBOW ON DISK - 
they're the "meat" of THE RAINBOW at a price that's 
small potatoes." And now you even have a choice 
about how it should be served up to you. 

To get your first heaping helping, just fill out and 
return the attached reply card. No postage neces- 
sary. 



player game. Benily Bear runs through the 
different castles, collecting gems (they look 
like dots to me! I and avoiding his enemies. 
Moving trees, swarms of bees and the wicked 
witch try to stop him. Color Computer 3 
players should use a composite monitor or 
a TV set. not an RGB monitor. 

Devious — In Devious, you just kill 
everything in sight. This shoot-'em-up game 
is for one or two players and gives you the 
option of playing with the joystick only or 
a joystick/keyboard combination. There are 
ships in the air that shoot at you and resistor 
shields that cannot be destroyed but will 
destroy you. The enemy ground bases and 
mother ship are (where else?) on the ground. 
It keeps a person busy trying to shoot in two 
directions at once, especially if a higher 
skill level is chosen — where there are 
more air ships and all the ships fire more 
often with faster shots. 

Madness and the Minotaur — As prom- 
ised, this is the text adventure included 
with Treasury Pack #2. There's a large 
castle to wander around in and deadly gas 
thai seems to follow you everywhere. 
General advice: Avoid the gas and the 
traps, collect all the treasures, and take 
them to the forest to win. 

Considering the cost of the original games 



in these Treasury Packs, and considering 
(heir popularity. I have to recommend these 
two packages. Whether you're a "classic" 
collector or just an avid arcadist. these 
packages will make an excellent addition 
to your software library. It's like buying 
one and getting six or seven more for free 
— and you can't beat a deal like that! 

(Microcom Software. 2900 Monroe Ave., 
Rochester, NY 14618, 800-654-5244: $29.95 
each,$3S/H) 

— Gail Allore 



Software 



CoCo3 



Phonics Fun — 
Sounding It Out 
for Preschoolers 

As the co-director of a small private 
school. I was pleased to receive Phonics 
Fun for review. As its advertising points 
out. this educational game is intended for 
preschool to first-grade children — a very 
difficult age group lo write software for 



because children this age ha ven 'l yet devel- 
oped the skills necessary to read prompts 
on the screen. 

Phonics Fun is for the CoCo 3 with at 
least one disk drive; RGB or composite 
monitors are selectable from within the 
program. Although early primary children 
are the target users, it takes an adult to guide 
the child through the program at first. (This 
is not a criticism, just a fact.) Although I've 
found that the 5- and 6-year-olds at our 
school can be taught to turn on the equip- 
ment and load and run programs. I have yet 
to encounter a program for this age group 
that the child can operate without help the 
first time out. 

The program is supplied on a single, 
nonprotected disk, which must be left in the 
drive during program operation. After load- 
ing and running, the user is asked to indi- 
cate monitor type and to specify whether or 
not instructions are necessary. After that, 
the title screen appears. The next screen is 
a menu that allows the user to select one of 
the four categories: farm, circus, magician 
or park. This menu has large numerals next 
to excellent pictures representing the 
choices. The choices are also spelled out 
for adults, but the child can make his or her 
selection without reading — hurrah! The 
selected background for the exercise is 




METRIC INDUSTRIES, INC. 



Model 101 

Serial to Parallel Printer Interface 

* Works with any COCO 

Compatible with "Centronics" Parallel Input Printers 

Just turn the knob to select any one ol 6 baud rates 300-9600 

Comes complete with cables to connect to your printer 

and computer 

Can be powered by most printers 

Model 104 Deluxe Interface 
with "Modem Switch" 

Same Features as 1 01 Plus 

Built in Serial Port lor your Modem or other serial device 
Switch between Serial Output and Parallel Output 
Comes wilh cables to connect to your computer and printer 
Can be powered by most printers 

Model 105 Serial Switch 

Connecls lo your COCO lo give you 2 switch selectable 

Serial Ports 

Comes wilh a 3 loot cable to connect to your computer 

Now you can connect your Printer (or printer interlace) 

and your Modem (or other serial device) lo your COCO 

and Hip the switch to use either device 

Does nol require power 

Cassette Label Printing Program 

New Version 2.1 prints 7 lines ol inlormation 

on Cassette labels 

Comes on Tape with instructions lo transfer lo disk 

Menu driven, very easy lo use 

Save and Load Labels from Tape and Disk 

Uses the features ot your printer lo print standard, 

expanded, and condensed characters 

Automatically Centers Each Line of Text 

Allows editing of label before printing 

Program comes wilh 24 labels lo gel you slarted 

16KECB required 



Some of the Printers 
That Can - 

Supply power for the 101 and 
1 04 are Radio Shack, Star. 
Okidala, Brother, Juki, and 
Smith Corona. 

Some of the Printers 
That Cannot - 

Supply power tor the interfaces 
are Epson, Seikosha, 
Panasonic, Silver Reed and 
NEC. II your printer cannot 
supply power to the interface 
you can order your interface 
with the "P" option or you can 
supply your own AC adapter. 
We recommend the Radio 
Shack 273-1431 AC adapter 
with a 274-328 connector 
adapter. 

Write or call for more 
information or for technical 
assistance. 



Price List 




Model 101 


35.95 


Model 1 01 P 


41.95 


Model 104 


44.95 


Model 104P 


51.95 


Model 105 


14.95 


Cassette Label Program 


6.95 


Pin Feed Cassette Labels: 


White 3.00/100 



4 Pin Din Serial 
COCO Cables: 

Male/Male 6 foot 
Male'Femalefjfoot 
Female/Female 6 foot 
Other Lengths Available. 

All items covered by a 
1 year warranty 



4.49 
4.49 
4.49 



Ordering Info 



* Free Shipping in the 
U.S.A. (except AK and HI) 
on all orders over $50 

* On orders under S50 
please add $2.50 for 
shipping and handling 

* On orders outside the 
U.S.A. please write or call 
for shipping charges 



You Can Pay By: 

* VISA or MasterCard 

* Or send check or money 
order payable in U.S. funds 



Metric Industries Inc. 
P.O. Box 42396 
Cincinnati, OH 45242 

(513) 677-0796 
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drawn and a iune is played appropriate to 
that choice. 

The graphics are drawn on HSCREEN2 so 
that 1 6 colors are used and the tunes chosen 
for each area are clever and well-executed. 
Windows are then overlaid on the back- 
ground in which the exercise takes place. A 
picture is drawn of an object one might 
expect to find in the chosen location in the 
left window, and four words appear in the 
right window with their initial letters high- 
lighted. The child needs only to match the 
initial sound with the picture and press the 
appropriate letter key. If an incorrect choice 
is made, that word is erased and the pro- 
gram waits for another response. If the 
correct choice is made, the computer plays 
a short tune, and another object appears for 
identification. 

At each point in the program where the 
child can make a choice, only choices shown 
onscreen are accepted, other keys are ig- 
nored. Each "locale" in the program has 1 
objects for identification; when each has 
been identified the child receives a written 
"pat on the back" and is asked whether or 
not to go on to another category or end the 
program. Unfortunately, for a moment the 
program slips out of its target market and 
assumes the child can read the prompts. 
However, with adult guidance the first lime 
or two. the child learns to answer correctly 
at this point. 

The program is written in BASIC in six 
modules: one for the title and initialization, 
one for the menu, and one for each of the 
menu choices. None of these stand alone, 
and the program loads and reloads each 
module as needed. It might have been more 
elegant to place the pictures and choices in 
a data file so they would come up in a 



Nearly 200 
Color Computer 
Software Titles! 

Call today to get your new 1990 
Express Order Software Buyer's 
Guide. Choose from popular games, 
educational packages, productivity 
software and more. It's the fast and 
easy way to get the software you 
really want. 




A DIVISION OF TANDY CORPORATION 



1-800-321-3133 



random order each time, and so the number 
of pictures could be added to at a later date 
by purchasing another picture disk. But the 
system works, and conceivably more pic- 
tures could be made available with another 
complete disk of six modules for the addi- 
tional pictures. 

Although the very effort of trying to add 
to the specialized needs of this level of 
educational software is to be applauded, 
the program does have its drawbacks. It 
would be a good idea for the authors of 
educational software to consult a teacher 
familiar with the target group or at least 
proofread their work. 

Since we are concerned only with the 
initial sounds of the words, it is not neces- 
sary to include the whole word in the choice 
box — large initial letters would be easier 
to read. The child does see the word spelled 
out under the object after making a correct 
choice. 

Since this program is basically an inter- 
active ABCs book, it would have been nice 
if it had included an object beginning with 
every letter in the alphabet. There are 40 
pictures available, and some letters are 
duplicated from section to section. Also, 
some words do noi begin with a clearly 
individual letter sound but with a digraph 
such as sh, eh and ai. so there was plenty of 
room for all 26 letter sounds. 

Some of the choices are words I would 
not commonly expect a child this age to be 
familiar with. Pail is one example. In this 
part of the country we more commonly call 
the item in question a bucket, but this may 
be a regional peculiarity. More serious is 
the expectation of the child to identify a 
skateboard as a skate and a ferns wheel as 
afcrris. Admittedly the initial letter is the 
deciding factor, but when the word appears 
under the object, it seems desirable to have 
the whole compound word appear. 

Some misspellings were noted, an un- 
desirable flaw in educational programs; 
and a few pictures were not readily identi- 
fiable by children who tested the game, but 
a phone call to the author brought reassur- 
ance that future copies of the program 
would have these corrected. 

In spite of the drawbacks mentioned, 
and in light of the .shortage of educational 
programs of any kind for the preschool to 
first-grade level. I feel that at the asking 
price of $15 this would be a valuable addi- 
tion to the software library of anyone who 
has or works with children in this age 
group. A child of this age will play it again 
and again for a chance to look at the pic- 
tures and hear the tunes. 

( W.B.D. Software, P.O. Box 1077, Ksterhazv, 
SK S0A 0X0. Canada, 306-745-6527; $17 
U.S. plus $2 S/H) 

— Richard Gordlev 
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Supersound — 
Digitized Sounds 
for BASIC Programs 

Did you know that a computer can act as 
a "digital" tape recorder — converting 
natural sounds you hear into digitized data 
the computer can understand? Digitized 
sounds can be stored in memory, played 
back and manipulated just like any other 
kind of numerical data. Supersound is a 
software sound digitizer that turns a CoCo 
3 into just such a digital recorder. 

You"ll learn what Supersound is all about 
by running the demo program that comes 
with the package: First there is a CoCo Max 
III picture of a chugging steam engine 
(with animated puffs of smoke and rolling 
wheels and rails); accompanying the pic- 
ture we hear the realistic digitized sound of 
a moving train. Next we see another CoCo 
Mux III picture of an animated reel-to-reel 
tape recorder and hear a selection from a 
perky Sousa marching tune. Suddenly the 
tape recorder switches to fast forward and 
so does the music! Then we hear the music 
played backward, then forward again bul 
very slowly this time, and so on. 

Supersound allows sounds lasting from 
a few seconds to several minutes to be 
recorded (digitized) into a CoCo 3, played 
back and saved to disk. There are special 
effects that can be applied to the digitized 
sounds that mimic features found on pro- 
fessional tape recorders. If you program in 
Disk Extended BASIC. Supersound offers a 
method for adding your digitized sounds to 
BASIC programs, and you can also add 
sounds to CoCo Max III pictures with sound 
and animation occurring simultaneously. 

Supersound comes on a single, unpro- 
tected disk, operates under Disk BASIC and 
includes a seven-page, photocopied man- 
ual. The manual states that the program 
should also work with most other CoCo 
DOS products. System requirements in- 
clude a CoCo 3 witli a minimum of l28Kof 
RAM and a disk drive. Sound is entered 
into the CoCo with an included cable that 
connects between a standard earphone jack 
and the right joystick port, so you'll need a 
sound source that has a 1/8-inch earphone 
output, such as a cassette tape recorder, 
radio or TV. If you want to digitize your 
own sounds (your voice, for example), you 
need a tape recorder. Supersound can take 
advantage of extra memory — up to 5 1 2K 
for digitizing and storing longer sound 
sequences. 



100 



THE RAINBOW January 1990 



Supersound operates in the 32-column 
screen with buff letters on a black back- 
ground. The program is written partly in 
machine language and partly in BASIC. Like 
a basic program, Supersound can be halted 
(except when playing a sound) by a press of 
the BREAK key. and can be restarted by 
typing RUN. If you're familiar with pro- 
gramming, you can edit the screen width 
and colors to your liking (in fact, the man- 
ual encourages you to edit the BASIC drivers 
to your liking). 

To digitize your first sound, you need to 
have either a prerecorded sound ready to 
go. or have a tape recorder that allows you 
to monitor live input through the micro- 
phone (in record-pause mode, for example). 
Single-key commands from the main menu 
initiate the real-time recording/digitizing 
process. You first enter a "monitor" mode 
where you can actually hear the digitized 
sound through the monitor speaker or au- 
dio jack of the CoCo 3. Here you can adjust 
the input volume of your sound source and 
preview the digitized sound. When you're 
ready- to record, press the space bar. The 
recording process begins and continues 
unlil either the space bar is pressed again or 
the allotted memory is used up. 

Once recorded, the digitized sound can 
be played back immediately. You hear it 



just as it sounded during the recording/ 
digitizing process. You can now take ad- 
vantage of some of Supersound's special 
effects features. You can speed up the play- 
back rate, making your own voice sound 
like a chipmunk's, or slow it down to sound 
like Darth Vader's. You can play it back- 
ward with obvious results, and you can add 
varying levels of reverb to your sound. 
When you've set playback rate, reverb and 
other effects to your liking, you can save 
the sound to disk with all settings intact. 
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Once saved to disk, a sound can be 
loaded and played back at any lime with 
Supersound (be advised that if you re- 
corded a sound to the full capacity of a 
512K CoCo, several disks would be re- 
quired to store all the sound data). Super- 



sound files can also be accessed directly, in 
conjunction with the machine language 
utilities provided, for use with your own 
BASIC programs or CoCo Max pictures. 

As you become more experienced with 
Supersound you can make use of some of 
its more advanced features. The "sampling" 
rate (that is, the resolution/fidelity of the 
digitized sample) can be set to any of 255 
settings, where represents the fastest 
sampling rate. The faster the sampling rate, 
the higher the fidelity of the sound and 
consequently the less recording time avail- 
able per unit of memory. Six seconds of 
sound at highest fidelity consumes 40K of 
memory, while the same six seconds at a 
more modest sampling rate uses only 20K. 

One limitation is that if you record a 
sound at the fastest sampling rate, it cannot 
be played back at a speed faster than the one 
at which it was recorded. I found a rate of 1 2 
to be acceptable for most applications. A 
1 28K CoCo can store about nine seconds of 
sound at highest fidelity, while a 5I2K 
CoCo can store over a minute of the same. 

If you're willing to trade a little more 
fidelity for some extra versatility. Super- 
sound can act as a two-track recorder, al- 
lowing you to record a sound first to one 
track and then record a new sound to the 
second track while monilorina the first. 



Nine-Times 

The first magazine devoted exclusively to OS-9! 

Every other month you will receive a disk jam-packed 
with programs and articles all for OS-9. 

Each Issue contains: 10 helpful and useful programs to help build your OS-D 
library * Instructions, examples, and samples of Baslc09 procedures and 
subroutines to help with your own programs and your understanding of Baslc09 
■ C programs and programming examples " Program reviews. Hints. Help 
columns, and Informative articles to advance your knowledge of OS-9 " Supplied 
totally of 5.25" disk ' Bound manual sent to each new subscriber for help In 
getting Nine-Times up and running, as well as tips on using it with a ram disk or 
hard disk ' All graphic /Joystick Interface for case of use. 



1-Year Subs, $34.95 



Canadian postage, add Si .00 
Foreign postage, add S7.00 



Back Issues: Back Issues are available for the May 1989 and July 1989 
Issues. Please write for Information on Back Issue contents. 

Back Issue, ea. $7.00 Foreign postage, add $1 .50 ca. 



May;r/ilie Source: Due to many Inquiries, the source code for the 
magazine graphic shell is being provided as an informational tool. Included Is 
the actual I3as1c09 source code and complied modules on disk, as well as 
documentation and a printed copy of the source code. 



Source, $24.95 



Foreign postage, add Si .50 
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hnlcal Assistance:"^ 
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COMPUTER ISLAND EDUCATIONAL SOFTWARE 

$15 each-tape or disk 
Moneypack 

Math Invaders 

First Games (Ages 3-6) 

Arrow Games (Ages 3-6) 

Cocowheel of Fortune (for Coco 2) 

Cocowheel of Fortune (Coco3/RGB) 

Spanish Baseball 

French Baseball 




227 Hampton Green 

Staten Island^KYtbl 2 

(718)948-2748 



Add $1.00 postage, NY res. add tax 
VISA, MC - Send for free catalog 
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Both tracks can then be played back to- 
gether and effects such as volume and 
reverb can be adjusted individually for 
each track. This makes for neat effects! 

Supersound also gives you control over 
just where and how much memory is to be 
allocated to your recording. Sound is stored 
in 8K blocks, and the starling and ending 
blocks of memory to be used can be defined 
prior to digitizing. If you're like me, your 
knowledge of the CoCo probably does not 
extend into the realm of how memory is 
actually managed, so the Supersound manual 
includes an easy-to-understand table of 
various stalling and ending block number 
locations for storing sounds. For example, 
memory blocks 48 through 5 1 are indicated 
as being used by the CoCo 3 to store Hi-Res 
graphics screens, so if you want to use a 
digitized sound with a CoCo Max picture, 
you would not want to use these blocks for 
storing sound (though as I discovered by 
mistake, loading a sound into these loca- 
tions while displaying an animating CoCo 
Max III picture makes for an interesting 
display of video noise). If you have an 
internal 5 1 2K upgrade, a total of 48 8K 
blocks of memory are available. 

Some Disk Extended BASIC program- 
ming knowledge is required if you want to 
use Supersound files with your own CoCo 
Max III pictures or BASIC programs. The 
manual has a listing of USR calls and poke 
addresses (in Hex) that allows access to all 
of Supersound's features from BASIC. While 
USR calls and poke functions are a little 
beyond my own technical knowledge, I 
found it easy enough to use the CoCo's 
built-in BASIC editor to review and edit 
Supersound's. BASIC driver and demo pro- 
grams for use with my own programs. 
Supersound's BASIC programs are short 
and clearly annotated. I also found gener- 
ous help just a phone call away by calling 
the technical support number listed in the 
manual. 

Overall, I rate the quality of the digitized 
sound as only fair, and I was unimpressed 
with the effectiveness of the reverb effect 
feature. I haven't had the benefit of review- 
ing other sound digitizers for the CoCo so 
I don't know how Supersound compares 
with the others, but I'm sure the greatest 
limitation on sound quality for any digitiz- 
ing software for the CoCo is imposed by the 
inherent slowness of the CoCo's operating 
speed {Supersound does use the high-speed 
mode for better sound quality). If you want 
the high-quality digital sounds associated 
with CD and DAT players, you won't find 
them here, but if you are looking for the 
tools to create customized sounds that go 
far beyond the beeps and buzzes normally 
available to CoCo users, this is the program 
to have. 



Supersound is a basic nuts 'n bolts kind 
of program that does all it promises to do. 
Supersound does have a bit of a "home- 
made" look and is not as slick a production 
as some other software available for the 
CoCo 3 (the manual, for example, is full of 
typographical errors), but on the other hand 
the program has a positive and friendly feel 
to it. What comes across is a program that 
works and is open to whatever level of 
expertise the user wants to bring to it. 
While I would not recommend Supersound 
to a raw beginner, I think this program 
would be of interest to the moderately 
experienced CoCo user who's done some 
BASIC programming and is interested in 
exploring another capability of this remark- 
able machine. 

(Supersol't, Inc., 363 Oakwood Ave., Jackson, 
MI 49203, 517-787-3610; $39.95 plus $2.50 
for S/H) 

— Walter Myers 
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the filename, starting, ending and execu- 
tion addresses for tape systems. The re- 
mainder of the documentation consists of 



Space Pac — 
Blast Off and Blast 
the Enemy 

Space Pac from Microcom is a collec- 
tion of 10 machine language programs that 
show off the CoCo's power, featuring old 
favorites and games with new twists. 

The collection is available on tape or 
disk and runs on all models of the CoCo 
having at least 16K of memory (except for 
one version of Android Attack, which re- 
quires 32K). The collection is not copy- 
protected, and it is highly recommended 
that the owner make backups (more on that 
later). Most games require one joystick, a 
few require both, and several can be played 
from the keyboard. 




The documentation consists of five S'A- 
by-5'/:-inch photocopied sheets. The print is 
extremely small and hard to read. System 
requirements and loading instructions for 
both tape and disk are provided along with 
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itn no extra 
hardware required, 
the 32K version 
speaks through the 
TV speaker. I often 
thought the sound 
generator had the 
! capability to vocalize, 
| but I didn't have the 
| machine language 
expertise to prove it. 



game-specific instructions for the individ- 
ual games. The information on game play 
is precise and adequate. 

1 have consulted with my 9-year-old 
daughter, Shari, and 7-year-old son, Brian, 
for some of the following remarks on the 
individual games: 

Color Zap — - You are in the center of the 
screen. With the right joystick you fire on 
invaders at the four points of the compass. 
Rapid-fire is available so the challenge is 
not so much to shoot all the invader* as to 
prevent your laser from overheating and 
melting down. Brian likes the sound ef- 
fects, but Shari doesn't like her laser melt- 
ing all the time. The game is challenging 
but it becomes monotonous after a while. 

ColorSpace Invaders — This is a famil- 
iar computer game in which waves of in- 
vaders march back and forth across the 
screen, dropping bombs and firing lasers at 
you. You're at the bottom of the screen 
with left and right movement. You fire 
back at the invaders and have a shield to 
protect you. The game can be played with 
joysticks or keyboard, but the kids recom- 
mend joysticks. The game was a bit too 
challenging for the children because you 
can have only one shot on the screen at a 
time, and there are very many invaders. 

Planet Invasion — In this game you 
defend your planet's surface (the bottom of 
the screen) and precious crystals from at- 
tack. Control is by means of one joystick 
and the keyboard. This is best played with 
two players, one to fly the ship and man the 
guns while the other controls the smart 
bombs and the "panic button," hyperspace 
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The Rainbow Bookshelf 




Fill out your CoCo library 
with these selections 



The Complete Rainbow Guide to OS-9 

Authors Dale Puckett and Peter Dibble show how to take 
advantage of OS-9's multitasking and multiuser features. An easy- 
to-read, step-by-step guide packed with hints, tips, tutorials and free 
software in the form of program listings. 
Book $19.95. Disk Package $31 (2 disks, book not included) 



The Rainbow Book of Simulations 

20 award-winning entries from THE RAINBOW'S first Simulations 
contest. You are a Civil War Commander, an air traffic controller, 
a civil defense coordinator, or a scientist on Mars . . . your wits are 
on the line. 
Book $9.95, Tape $9.95 



The Complete Rainbow Guide to OS-9 Level II 
Vol. I: A Beginners Guide to Windows 

Puckett and Dibble have done it again! They uncover the 
mysteries of the new windowing environment and demonstrate 
clever new applications. More hints, tips and plenty of program 
listings. Book $19.95, Disk $19.95 

Thfc Rainbow Introductory Guide to Statistics 

Dr. Michael Plog and Dr. Norman Stenzel give a solid introduction 
to trite realm of statistical processes and thinking for both the 
beginner and the professional. (80-column printer required.) 
Book $6.95, Tape or Disk $5.95, Package $11.95 

The First Rainbow Book of Adventures 

Contains 14 winning programs from our first Adventure contest. 
Includes Sir Randolph ol the Moors, Horror House, One Room, Dr. 
Avaloe and more. Plus hints, tips on solving Adventures. 
Book $3.50, Tape $3.50 

The Second Rainbow Book of Adventures 

Featuring 24 of the most challenging Adventure games ever 
compiled. Meet the Beatles and battle the Blue Meanies, find a 
hidden fortune, or win the heart of a mysterious princess. Ring 
Quest, Secret Agent Man, Dark Castle, Curse ol Karos and more! 
Book $13.95, Tape $13.95 

The Third Rainbow Book of Adventures 

The excitement continues with 19 new Adventures. Discover 
backstage intrigue at the London Theatre, attempt a daring space 
rescue, or defeat evil in the year 2091 as a genetic android. Evil 
Crypt, Spy waster, Time Machine, The Amulet, and that's only the 
beginning! Book S11.95, Tape $9.95, Two-Disk Set $14.95 

The Fourth Rainbow Book of Adventures 

Fourteen fascinating new Adventures from the winners of our 
fourth Adventure competition. Rely on your wits to escape a hostile 
military installation, try to stop the Nazi plan to invade Great Britain, 
manage to reinstate our defense system before the enemy launches 
a massive missile attack, and more! 
Book $10.95, Tape $9.95, Two-Disk Set $14.95 



The Second Rainbow Book of Simulations 

The 16 winners from our second Simulations contest. Fly through 
dense African jungle, bull your way down Wall Street, lead a bomb 
squad, or try your hand at Olympic events. Test your skills and 
talents. Book $9.95, Tape $9.95, Disk $10.95 



"I 



/ want to start my own Rainbow Bookshelf! 

Name 

Address 

City 

State ZIP 



□ Payment Enclosed, or □ Charge to: 

□ VISA C MasterCard □ American Express 
Account Number 

Card Expiration Date 

Signature 

Please send me: 

C The Rainbow Book of Simulations 

C Rainbow Simulations Tape 

L The Second Rainbow Book ol Simulations 

C Second Rainbow Simulations Tape 

C Second Rainbow Simulations Disk 

I The Complete Rainbow Guide to 0S-9 (book only) 

C Rainbow Guide to OS-9 Disk Package (2 disks) 

Q The Windows & Applications Disk for 

The Complete Rainbow Guide lo 0S-9 Level II, Vol. I 
C The Rainbow Book ol Adventures (hrsij 
C Rainbow Adventures Tape (first) 
C The Second Rainbow Book ol Adventures 
C Second Rainbow Adventures Tape 
C The Third Rainbow Book ol Adventures 
D Third Adventures Tape 
D Third Adventures Disk Set (2 disks) 
G The Fourth Rainbow Book of Adventures 
C Fourth Adventures Tape 
G Fourth Adventures Disk Set (2 disks) 
D Introductory Guide to Statistics 
C Guide to Statistics Tape or Disk (indicate choice) 
Q Guide to Statistics Package (indicate choice ol tape or disk) 

"Add S2 per book Shipping and Handling in U.S 

'Outside U.S.. add $4 per book 

' Kentucky residents add 5% sales tax 

(Allow 6 to 8 weeks lor delivery) Total 

Mail to: Rainbow Bookshelf, The Falsoft Building, P.O. Box 385, 
Prospect, KY 40059 

To order by phone (credit card orders only) call (800) 847- 
0309, 8 a.m. to 5 p.m. EST. For other inquiries call (502) 
228-4492. 

Please note: The tapes and disks ottered by The Rainbow Bookshelf are nol stand-alone products. 
Thai is. they are intended to be an adjunct and complement lo Ihe books. Even it you buy the tape 
or disk, you will still need the appropriate book. OS-9 8 is a registered Irademark of Ihe Microware 
Systems Corporation. 
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drive. The ship moves too fast for Brian — 
he can't keep track of it! Shari can't watch 
the radar screen and the ship too. I like the 
challenge of the immediate battle with the 
overall scene provided by the radar. 

Space War — This is a very tough one 
with a lot of action. Surprisingly the kids 
did quite well and therefore liked this game. 
Both joysticks are used in game play, but 
you don't need the functions on the left 
stick to do well. You fire on the Death Star 
while avoiding the black hole, an enemy 
ship and fire from the Death Star. The 
action is fast and the controls are touchy, 
but it's a lot of fun trying to master them. 

Space Race — You fly around a four- 
cornered race track in space, firing at aliens 
and dodging their missiles. Brian has this 
game down pat. He spent hours with the 
firebutton held down, bouncing off the 
walls in a headlong rush around the track — 
and scored higher than anyone else! 

Galax Attack — Galactic Attack on the 
CoCo, a good rewrite of a classic. The 
children didn't like this one too well, but 
they don't like it on any other machine 
either! 

Android Attack — The CoCo speaks! 
With no extra hardware required, the 32K 
version speaks through the TV speaker. I 
often thought the sound generator had the 
capability to vocalize, but I didn't have the 
machine language expertise to prove it. 
The voice is not top quality and is difficult 
to understand, but the feat itself is impres- 
sive enough thai I hope other programmers 
take the seed and expand on it. In the game, 
you walk through a maze of rooms fighting 
androids and collecting treasure. This is 
relaxing after the high-pitched action of 
some of the other games, but it isn't wimpy. 
There is a I6K version of the game (hat 
plays just the same, yet lacks speech. 

WiiirlyhirdRitn — 1 hope you have your 
pilot's wings for this one! You fly a chop- 
per over hilly terrain, hunting for enemy 
bases and fuel depots, while firing machine 
guns and dropping bombs. Ground-based 
missiles are hunting you. The second screen 
features airborne hazards in addition to the 
ground-based ones. I don't know for sure 
what awaits after that, because we never 
made it past the second screen. This was the 
family favorite. 

Space Sentry — In deep space your 
radar screens are your eyes. In this game 
there are three radar screens to watch: one 
tuned to react to space mines, one tuned to 
your refueling station's beacon, and one 
scanning for alien craft. The radar is hard to 
see, and it's difficult to distinguish echoes. 
Yourcraft is highly maneuverable and fast. 
You have your hands full with this one. 

Storm Arrows — I've never seen one 
like this. You maneuver through a arid. 



dodging storm arrows while looking for 
refueling stations. You must avoid mines 
and keep an eye on the timer. The quicker 
you clear the screen, the higher the bonus 
points. 

Space Pac presents an interesting vari- 
ety of games. I am impressed with the 
programming. Not only is the speech a 
surprise, but the programmers have done 
some strange things with the screen (flash- 
ing colors without borders, for instance). 
The resolution and animation are really 
impressive. 

My major gripe is that there is no exit 
from the programs. For instance. 1 had a 
disk crash after a reset before I write- 
protected the disk. (I recommend backing 
up the program.) A cold start eliminated the 
problem, but it's hard on the hardware to 
cold start after each game. If you hold the 
reset button for about five seconds, you get 
a fairly reliable restart with only an occa- 
sional conflict. Space Pac's price is reason- 
able for the quality of the programs. It's an 
enjoyable break from "computing"! 

(Microcom Software, 2900 Monroe Ave., 
Rochester, NY 14618, 800-654-5244; $29.95) 

—William Baird 



CoCo 3 



^Seftware- 

Cyclejump — 
Breezy Rider 



Today, sports fans, we will talk about a 
new motorcycle jumping game called Cy- 
cleJump. In this game, the player jumps a 
motorcycle off a ramp over barrels. And if 
he is good enough, the player gets the 
opportunity to jump the famous El Gato 
River Canyon in a special jet cycle. Best of 
all — no bones are broken should you miss 
a jump. You can get right back on your 
saddle and try again (Evel Knievel should 
love this). 

CycleJump comes on an unprotected 
disk with a sheet that explains the object of 
the game. It is written for the CoCo 3 with 
a disk drive and a joystick. 

There are three levels to the game. The 
object of the first level is to jump off a ramp 
and land on a target center, which varies 
randomly for each jump. The speed of the 
cycle is controlled by the position of the 
right joystick, from full left for stop to full 
right for top speed. The distance traveled 
through the air is determined by the speed 
of the cycle as it leaves the ramp. 

The cycle makes two passes across the 
bottom of the screen before it comes to the 
ramp, which gives the player time to gauge 



his speed. The rider receives 250 points for 
landing on the target, or points if he 
misses. After 3000 points are amassed or 
12 jumps made, the rider goes to Level 2. 
The second level is like the first, except 
that on this level, instead of trying to land 
on a target, the rider must jump over bar- 
rels. To add to the difficulty in scoring 
points the cycle must land within the width 
of one barrel from the last barrel, otherwise 
points are lost. After 5800 points are reached, 
it is time to so to Level 3. 




In Level 3 the screen changes to a river 
canyon and the rider trades in his cycle for 
the SuperRocketCycle to jump the El Gato 
River Canyon. Here the joystick is used to 
set the thrust. Should a jump be attempted 
with the thrust set incorrectly, the rocket 
cycle disintegrates in midair, and the rider 
loses 1000 points. 

Every successful jump scores between 
5000 and 10,000 points; scoring 50.000 
points puts the rider in the Hall of Fame and 
wins the game. But keep in mind there is a 
time limit. (Bonus time is awarded for good 
jumps, though.) If the rider's score goes 
under 100 points, the game ends. 

CycleJump is written with Hi-Res graph- 
ics so the game looks pretty impressive on 
my RGB monitor, and it is an enjoyable 
game to play. With a deluxe joystick Cy- 
cleJump is fairly easy to play (1 joined the 
Hall of Fame in three tries), but a little more 
difficult with a joystick that doesn't self- 
center. 

CycleJump is the first commercial work 
of Thomas Rawlinson. and I was impressed. 
(Soap box time.) I feel any computer is only 
as good as the people who write programs 
for it, and with new writers like Mr. Rawl- 
inson coming up. we know the CoCo is 
alive and well. 

CycleJump is a good-looking game that 
isn't too difficult for anyone, and the younger 
arcade gamers will especially like it. The 
price makes it a good deal. So. hop aboard 
your bike and we'll see you in the air. 

(J.T. Rawlinson Software, #361 St. Germain 
Ave., Toronto, ON M5M 1W6, Canada, 416- 
782-5718; $14.95 plus $2 for S/H) 

— Steve Griffith 
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The following products have recently been received by THE RAINBOW, examined 
by our magazine staff and issued the Rainbow Seal of Certification, your assurance 
that we have seen the product and have ascertained that it is what it purports to be. 



Action Arcade Pack: Volume 2, a set of 

two arcade games for the CoCo 3. Penny in 
Polwland, similar to the arcade game PengO, 
is wrilten in BASIC; the goal is to avoid the 
evil Munchers and return safely to Peng 
City. Pyramid Pete, written in machine 
language, is similar to the arcade game Q- 
herl. Christopher English Communications, 
40-25 College Point Blvd.. #8G. Flushing, 
NY 11354, (718) 445-6589; $9.95. 

Big RAMDisk, a set of eight RAM disk 
programs for eight combinations of Disk 
BASlc/drive setups and also two utilities: 
Copydisk. a program that copies files be- 
tween physical disks and RAM disks: and 
Relocate, a program that changes Big RAM- 
Disk's memory location should another 
machine language program cause a con- 
flict. Requires a 512K CoCo 3 and "any 
version of Disk BASIC." Danosoft. P.O. 
Box 124. Station A, Mississauga, ON L5A 
227. Canada. (416)897-0121: $12.95 U.S., 
$14.95 Cdn., $2.50 for SIH. 

C(JP*Max. a utility for printing color 
pictures on Radio Shack's CGP-220 ink- 
jet color printer. Features support of "the 
full range of colors the CoCo 3 can produce 
on an RGB monitor." It prints hscreen2 
pictures and works with VuMaster and the 
CoCo Max Ill's translat utility. For the 
CoCo 3 and a disk drive. Supersoft, Inc.. 
363 Oakwood Ave. Jackson, Ml' 49203. 
1517)787-3610; $14.95 plus $2.50 SIH. 

Comics+. a graphics editor designed to 
help users create comic strips. Features a 
poYra-and-cliek icon-oriented interface with 
pull-down menus. Options include Draw, 
Paint, Lines, Magnify. Undo. etc. It also 
includes a clip art library of 42 predrawn 
faces, eyes, noses, mouths and hands. 
Requires a disk drive, a self-centering joy- 



stick, a DMP 105 or 106 printer, and a 
CoCo 1. 2 or 3 having at least 64K. E.Z. 
Friendly, 1 18 CorliesAve., Poughkeepsie, 
NY 12601, (914) 485-8150; $21.95 pins 
$1.50 Sill. 

KJV on Disk #4, Exodus chapters 22 
through 40 of the King James version of the 
Bible on disk in ASCiI files forCoCos 1 . 2 
and 3. BDS Software, P.O. Bo.x485. Glen- 
view. IL 60025, (312) 998-1656; $3. 

■^ Lottery Made F.asy. a menu-driven 
Lotto game that helps players choose their 
numbers. Supports Pick 7. Pick 8. Pick 12 
and Pick 20. Requires a CoCo 3, one disk 
drive and an RGB monitor. RRA & Com- 
pany. P.O. Box 17087. Des Moines, 1A 
50317. (515) 262-3858; $15. 

Pt — File Manager, a machine-language 
utility designed to simplify file and direc- 
tory management. Programs can be exe- 
cuted in a point-and-shoot environment. 
"Pt will work with any program that takes 
its parameters from the standard OS-9 shell 
command line." Designed to work as a 
stand-alone or in tandem with r"s M — 
Menuing System, r' Systems, 4072 E. 22nd 
St.. Suite '178, Tucson. AZ 85711. (602) 
745-2327; $19.95 plus $3 SIH. 



Star* Max 2.0. a set of utilities used to print 
color pictures on the Star NX 1000 Rain- 
bow color printer. Supports the range of 
colors the CoCo 3 can produce on an RGB 
monitor: TV/composite monitors can also 
be used. Features printing of hscreen2 
pictures and CoCo Max 111 double-screen 
pictures. Supersoft. Inc.. 363 Oakwood Ave., 
Jackson. Ml 49203. (517) 787-3610; $19.95 
plus $2.50 SIH. 

UltraEd+. a program to move the ROM 
pack EDTASM+ code to disk, add disk I/O 
and utilize the hardware of the CoCo 3. 
Features 80-column screen, dual buffers, 
key repeat and double speed. Supersoft. 
Inc.. 363 Oakwood Ave., Jackson. Ml 49203, 
(517) 787-3610; $22.50 plus $2.50 Sill. 

Vocab. a one- to six-player word game (the 
computer can play all six hands) modeled 
after the Parker Brothers game of Scrabble. 
Players try to outscore each other by creat- 
ing words and placing them on the board. 
Requires a disk drive and a CoCo 3 with at 
least 128K. SPORTSware. 1251 S. Rey- 
nolds Road, Suite414, Toledo, OH 43615, 
(419) 389-1515; $19. 



First product received from this company 



The Seal of Certification is open to all manufacturers of products for the Tandy 
Color Computer, regardless of whether they advertise in THE RAINBOW. 

By awarding a Seal, the magazine certifies the program doese.v/.s7 — that we have 
examined it and have a sample copy — but this does not constitute any guarantee 
of satisfaction. As soon as possible, these hardware or software items will be 
forwarded to THE RAINBOW reviewers for evaluation. 

— Lauren Willoughby 
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Feature 



. . and to think I was jealous of pigs 

Innovation 
Along the 
Border 




by Scott Thomas 



_ few months ago I received a 

j^k letter from a friend. The let- 
/^^ ter was typed on a word 
^™"^^ processor and the top of the 
jL, JBLpagc was decorated with a 
row of pigs. I was jealous of the fancy 
letterhead at first, but then I decided my 
CoCo could accomplish the same feat. 
That's when i began working on Station- 
ery Station. 

Stationery Station is a simple program 
that creates personalized stationery on a 
DMP- 1 05 printer. The program gives you 
a choice of six different pictures with 



Scott Thomas has owned a color com- 
puter for about five years and has enjoyed 
THE RAINBOW for four years. He's a junior 
at Western Michigan University major- 
ing in computer information systems. He 
can he contacted at 1 205 Red Pole Drive, 
DeWitt. MI 48820. 



which to decorate paper. The pictures can 
be printed on the lop of the page or both 
top and bottom. Under the top row of 
pictures your name, address and phone 
number are printed, resulting in your very 
own personalized stationery. 

The. program was written using a Color 
Computer 3 and a DMP- 105 printer. The 
program should, however, run on a 32K 
computer. The only modification needed 
for non-CoCo 3 users is to delete the 
speed-up poke in Line 4 1 00 and the slow- 
down poke in Line 4120. This slows the 
program down by a few seconds, but it 
should still run well. Also, the POKE in 
Line 4500 sets the printer rate to 2400 
baud. If you want to operate at 600 baud, 
delete the POKE. For other printers you 
must refer to the manual for any needed 
printer conversions. 

The graphics for the program are lo- 
cated in the data statements at the end of 
the program. Each data line represents a 



printed line, and the data is separated into 
blocks for each different picture. The first 
line of each block contains the first letter 
of the picture it prints. This is a flag used 
to position the pointer to the beginning of 
the data set to be printed. The actual posi- 
tioning of the pointer is accomplished in ; 
lines 4100 through 4120. The first two 
numbers in each data line are the start and 
end point of the print head. The other 
numbers represent the dot pattern to be 
printed. Two zeroes signal the end of each 
data block. The DMP- 105 manual ex- 
plains on pages 33 through 38 how to 
print graphics. 

To use the program, type in the listing, 
save the program, and enter RUN. A simple 
menu appears and asks you to press the 
first letter of the graphics character you 
want to use. A tone sounds when you 
press a key. If you press an invalid key, 
another tone sounds and the program waits 
for you to enter a correct response. After 
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Expandi ng Horizons 

Take your CoCo beyond the 
limits of floppy diskettes — 
connect to DELPHI, your 
complete online business 
and personal resource. 
With your modem and a local 
phone call, select from tens of 
thousands of downloadable 
programs, meet friends from 
across the globe, or tap into the 
world's most comprehensive 
databases to expand the 
horizons of your CoCo. 



Your Resource for 
Color Computers 

DELPHI'S special 
group for owners of 
Tandy Color 
Computers is sup- 
ported by the people 
who bring you RAINBOW 
Access extensive databases 
where you can upload your 
favorite files and download 
programs written by other 
personal computer enthusiasts. 
Chat with other members and 
resident experts in Conference, 
use electronic mail, and post or 
respond to messages in Forum. 

OS-9 ( )nline ~ 

In OS-9 Online", DELPHI'S 
interest group for fans of the 
OS-9 operating system, you'll 
meet other members, download 
files, and get tips to help you 
make the most of your CoCo. 



What 



your 




CoCo 
was really 
meant 
for. 



RAINBOW Online 



DELPHI is your online connection 
RAINBOW. You can renew your 
subscription, meet other 
Color Computer owners, 
order software or hard- 
ware, or inquire about 
products. You can even 
download programs pub- 
lished in RAINB W. 



to 




Wallet-Friendly 

You can access DELPHI with a local 
phone call from almost anywhere in 
the United States. There is NO extra 
charge for using Tymnet or Telenet, 
NO monthly minimum, NO 
premium for 1200 or 2400 bps, and 
connect rates are a low $7.20/hour. 



FREE Lifetime Membership 

As a RAINBOW subscriber, you 
get a FREE lifetime DELPHI mem- 
bership ($29.95 value) which in- 
cludes a credit worth one evening 
hour of usage ($7.20). 
If you don't already subscribe to 
RAINBOW, just request a subscrip- 
tion when you sign-up to DELPHI, 
and, for the $31 subscription fee, 
you'll get the same great deal! 

Sign up now - Online! 

With your CoCo and modem: 

1. Dial 1-617-576-2981.* 

2. Once connected, 
press RETURN once 
or twice. 

3. At Usemaine:, type 
JOINDELPIlf 

4. At Password:, type 
RAINBOW, if 
you already subscribe to 
RAINBOW. 

Type SENDRAINBOW. if you 
do not yet subscribe and wish to 
do so. 

5. Have credit information ready. 

* Or call DELPHI Member Services 
by voice at (800)544-4005 to 
obtain a local acc&ss phone 
number. 




No^ Risk 

With DELPHI there is no risk. You 
can cancel your membership within 
30 days and pay only for your usage 
beyond the initial one-hour credit. 



DELPHI 



f»- 



The World's Premier Online Information Service 

General Videotex Corporation • Three Blackslonc St • Cambridge MA 02139 
800-544-4005 • 617-491-3393 




a few seconds you are asked if you need lo 
enter your name. When the program is 
started, the information is blank; if you 
want your name information printed, press 
Y. You are then asked for your name, 
address, etc. Just press ENTER to leave out 
any information. As long as the program is 



running, the information you type is pre- 
served. If you need to change it. type Y 
when asked if you need to enter your 
name. Next you are asked if you want 
graphics printed on the bottom of the page 
as well; answer Y (yes) orN (no). After the 
printing is completed, you are asked if you 



want another copy of the same thing. If 
you answer N. you will return to the menu 
for a new selection. 

Stationery Station is intended for those 
who want a unique letterhead and want to 
exercise their CoCos' capabilities. Q 



32K ECB 




110 79 

222 210 

3990 85 

4210 250 

4380 82 

5010 144 

5040 242 

5110 144 

5150 154 

5210 175 

5270 51 

5320 122 

5370 131 

5430 46 

5490 204 

END 224 



The listing: ST a; ION 



STATIONARY SlAi :C\' 
COPYRK, HI 1989 FALS0-\ !\C 
BY: SCOTT THOM 
******* . ********** 



5 ' TITLE AMJ V .£NU 

9 DIM XU50) 

10 CLS0 

20 PRINT@7,"stat1onar>":CHR$(l?B 

):"station"; 

30 PRINT@47."by": 

40 PRINT@74 . "scott" :CHR$ ( I 28 : : " t 

homas": 

50 PRINT@133.DifiS<:4b):SUINr,t<8 

.147);CHR$<; .46): 

60 PRCNT@171.CHR$(149);" BE a; 

";CHR$(154:; 

70 PRINT@203.CHR$IK9;:" CCW 

";CHR$(154): 

80 PRINT@23b.CHR$(i«9>:" DUCK 

":CHR$(154:: 

90 PRINT@2C7.LrmC.49!;" FACE 

";CHR$(154J: 

100 PRINT@7U9.C-IRK149):" PIG 

":CHR$(154): 
110 PRXNT@331,CHR$<i49); M RAB8IT 

";CHR$(15-'-\ 
120 PRINT@363.Cf-R$<:«9;:" QUI! 

":CHR$(154); 
130 PRINTS.'MS.CHSS: 148);STR1N6$( 
8.156):CHRS(.52;. 
140 PRINT@4bb."en:er"CHR$(128)"f 
irst"CHR$(:25'<" l e::er" : 
150 PRINT@49I.":o"CnR$(i28)"se"e 
ct": 

160 P$-INKI v$: [« PS- HEN16G 

165 SOUNO 128,1 

170 IF P$-"Q" rHEN GO£t:34580:END 

180 IF INSTR{l."BCOFPR",P»)-0 !■ 

EN 190 ELSE 230 

190 SOUND1«.10:GOTO160 

200 GOSUB4100 



210 CLS:PRINT"DO YOU NEED TO ENT- 
ER NAMECY/N)?" 

220 Q$-INKEY$:IF Q$-"N"THEN222 E 
LSE IF Q$-"Y" THEN GOSUB 4400 EL 
SE 220 

222 FRINT"PRINT GRAPHICS ON BOTT 
OMCY/N)?" 
224 BT$-INKEY$:IFBT$-"Y"THENBT-2 

ELSEIFBT$-"N"THENBT-1 ELSE 224 
230 PRINT"READY PRINTER, PRESS R 
ETURN*":EXEC44539:GOSUB4500:PRIN 
T#-2.CHR$(18);CHR$(27):CHR$(B0); 
240 FOR Nl-1 TO BT 
250 READ S,E: IF S~0 THEN 260 ELS 
E GOSUB4000:GOTO250 
260 IF Nl-1 THEN GOSUB 4300 
270 NEXT Nl 

280 PRINT:PRINT"PRINT ANOTHER PA 
GE?":0$-*'" 
290 Q$-INKEY$:IF Q$-"Y" THEN 300 

ELSE IF Q$-"N" THEN 10 ELSE290 
300 GOSUB4100:GOTQ230 
310 END 
320 ' 

330 ' ** END OF MAIN PROGRAM ** 
340 " 

3990 • **** SUBROUTINES **** 
3998 • 

>99 • PRINT GRAPHICS 
4000 FOR N2-0 PC M 
'.010 IF Nl-2 AND N2-0 fHEN S-S+2 

;:r-E+25 

4020 GOSUB 4200 

4030 FOR 2-S TO E: IF N2-0 THEN R 

EADX(Z) 

4040 PRINT#-2,C> ^S X(Z)>;:NIX: 7 

40b0 S-S+128:E=E+128:GOSUB4200:F 

OR 2-S TO E:PRINT#-2.CHR$(X(Z-12 

8>);:NEXTZ 

'.060 S-S-128:E~£-128:NEXT N2 

4070 PRINT#-2:RETURN 

4098 ' 

4099 * FIND BEGINNING OF DATA 

4100 POKE65497.0: RESTORE 

41 lU READ D$: IF D$OP$ THEN 4110 
4.20 POKE65496.0:RETURN 
4:98 " 

4199 ' MOVE PRINT HEAD 

4200 PRINT#-2,CHR$(27);CHR$(16): 
Ch<$(N2);CHR$(S); 

4210 RETURN 

4298 • 

4299 ' PRINT NAME AND ADDRESS 

4300 PRINT#-2.CHR$(30):CHR$(27); 
CM.$(14) 

4.M0 PRINT#-2,STRING$(t40-LEN(N$ 

))'Z," ");N$ 

4320 PRINT#-2.CHR$(27);CHR$(15); 

:.l'5$(27):CHR$(20); 

•i <i0 PR1NT#-2.STR1NG$((134~LEN(A 

l$))/2," "):A1$ 

4i40 PRINT#-2,STRING$((134-LEN(A 

2$!)/2." "):A2$ 

4345 PRINT#-2.STRING$((134-LEN(P 



H$))/2," "):PH$ 

4350 IFBT-2 THEN F0RMT049: PRIN 

t#-2:NEX-TI 

4360 PRINT#-2,CHR$(18);:REST0RE 

4370 GOSUB4100 

4380 RETURN 

4398 ' 

4399 ' INPUT NAME AND ADDRESS 

4400 LINEINPUT"ENTER NAME:":N$ 
4410 LINE1NPUT"STREET ADDRESS:"; 
All 

4420 LINEINPUT'CITY. STATE, ZIP:": 

A2$ 

4425 LINEINPUT"PHONE NUMBER :";P 

HS 

4430 RETURN 

4498 ' 

4499 ' SET PRINTER TO NORMAL 

4500 POKE150.18:PRINT#-2,CHR$(30 
);CHR$(27);CHR$(19): 

4510 PRINT#-2,CHR$(27):CHR$(54); 

CHR$(27);CHR$(15):CHR$(27);CHR$( 

32): 

4520 RETURN 

4996 ■ 

4997 • ***** DAT a ***** 

4998 ' 

4999 " DATA BLOCK FOR PIG 

!.000 DATA P. 50. 61. 192. 176. 15iUk^- 
0. 192. 128. 192, 176, 172. 163. 198 jjjA. 

5010 DATA 34,69,192,160,160,144! 

135,136.136.132,132.132,130.130. 

130,130.130.132,131.132.128.128. 

128. 129. 130. 128. 152. 132. 176. 128. 

IS 1,134, 136. 144, 160. 128. 192. 192 

5020 DATA 27,72,224.176,136.196. 

162.209.169.212.170,213.128.160. 

160.160.192,128,128.128,128.128, 

128,128.128.128,128.128.128,128, 

128,128.128.128.128,224,128,128, 

128.128.156.162,193.136.128.201. 

162.156 

5030 DATA 24.69.240.158,129,208, 

168,212,170,213,170,213.170.213, 

170.213.170.213.170,212.169,210, 

132,152,224.128.128.128.128,128, 

128.168,128.192.160.144.232.136. 

136,137.133,132,130,130,129,128, 

129,129 

5040 DATA 21,58,224.144,144.147. 

156.160.202.149.172,213.170.213. 

170,213.170,213.170,213.170.213. 

170.149.142,192.156,163,160,166. 

248.128.128,128,213.254.129.170. 

213.255 

5050 DATA 22.58,129,129,128,128, 

128,128,129,134,154.147.150.147. 

150.147.150,147.150.147.148.147. 

145,158.145,145,145,142,128.143. 

145.153.145.153.143.138.142.142. 

135 

5060 DATA 0.0 

5070 ' 
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5080 ' DATA BLOCK FOR RABBIT 
5090 DATA R, 32. 61. 192, 160. 160, 14 
4.136.196.226.242.241.137.133.13 

1. 129.129. 129. 129. 129. 129. 131. 13 ■■ 
3,137.241,242,226.196,136,144,16 
0.160.192 

5100 DATA 30.63.252.227,240.184, 

188.158.159,142.134.159.160.192. 

132.162.196.128,224.224,128.196, 

162,132.192.160.159.134,142,159, 

158,188.184.240.227.252 

5110 DATA 31.62.224.144.136.132, 

130.129.193.184,134.129,128.129, 

241,248.253.252.252,253.248,241. 

129,128,129,134,184,193,129,130, 

132.136.144.224 

5120 DATA 31, 62.-143. 144. 14-4, 144, 

152,142.255.144.144,160,160,192; 

135.143,159,159,159.159,143,135, 

192,160,160,144.144.255,142,152, 

144.144.144.143 

5130 DATA 35.58.254.129.128,128. 

128.136.132.132,133,133,139,241, 

241.139.133.133.132.132.136.128, 

128,128.129.254 

5140 DATA 36.57,129,129,129,129. 

129,129.129.129,129,129,128,128, 

129,129.129.129,129,129,129,129, 

129.129 

5150 DATA 0.0 

5160 ' 

5170 ' DATA BLOCK FOR COW 

5180 DATA C, 27. 66, 196, 172, 156, 13 

3. 146. 146. 131. 142. 148. 138. 140. 14 
4,144,144,144,144,144,240,240,24 
0,240,240,240.240,240.240,176,14 
4. 176. 248. 248. 248. 248. 248. 248, 24 
0,240,240,224.224 

5190 DATA 27.66.131.132.132.130. 

130.134.136.176.224.156,191,255. 

254.252.252.216,128,129.131,131. 

231 . 231 , 247 . 247 . 247 . 243 . 240 . 224 . 

128.129,135.143.191.255.159,135, 

193.254,128.255 

5200 DATA 35,67.135.136,152,225, 

161,163.241.128.128.152.230,146, 

144.144.161.163,163.163,145.160, 

194.161.161.194,172,144,224,140, 

255,131.254,255.224 

5210 DATA 36,67.240.216.215,240. 

142.249.215,208.255,129,128,128. 

128.128,128.128,128,240.216.215. 

240,142.129.240.216.215.240.143. 

128.131,135.135 

5220 DATA 0.0 



5230 ' 

5240 ' DATA BLOCK FOR FACE 
5250 DATA F. 28. 65 .240. 152 .252, 13 
1.252,178.153.211.213.213,213,14 
5 . 129 , 129 . 199 , 167 , 222 , 160 . 208 . 12 
8.190.211,149.137.137.137.137.12 
9 , 129 , 129 . 167 . 199 . 254 , 128, 134 , 24 
8,152,224 

5260 DATA 28,65.135,136.147.172, 
147,134,137.136.136.248.134.210. 
170.213.170,213,170.133,128.128. 
128 .128.129. 134 , 250 . 145 . 144 . 1 56 . 
146,144,136.166,145,140,163,152. 
134.129 

5270 DATA 37,52.135.136.146,165. 
170.213.229.208.160.192,128.128. 
192.160.144.143 

5280 DATA 22.70,224.156.131.128. 
128.192.192.192.192.192.192,192. 
192.192.192,192.192,192,192.192, 
192.192.193,193,193,193,193,192, 
192.224,160,160.160.224,192.192, 
192,192,192,192,192.128,128.128, 
128,128.134.152,224 
5290 DATA 22,71,135.136,131.131, 
131.131,129,128,128.128,128.128. 
131.130.132,132,132,135.128.143. 
136.136,136.143,132,132,132,135, 
128.135,132.132,132.132.135.128. 
128.128,128.128,129,131,131.131, 
135,135,135,128,136.135 
5300 DATA 0.0 
5310 ' 

5320 ' DATA BLOCK FOR BEAR 
5330 DATA B, .39, 63, 158, 161 , 173. 17 
3. 237 ■.141, 129, 134, 132, 130, 130, 13 
■0.130. 130, 130. 132. -132. 132. 136. 14 
4.160.160.160.160.192 
5340 DATA 39.64,240,136.132,131. 
128.224.224.128.128.128.128.128, 
192,192,128,128,128,128,128,128, 
240.166.166.166.160,159 
5350 DATA 29,59.240,136,132,132. 
132,156.160,192,128,128.131,140, 
240.128.223.163,161.189.173.201. 
193.193.191,129.128.128.128,128, 
192,176,143 

5360 DATA 29,56.131.132.136.144. 
160.192,240,168,213.171,213.169, 
192.159.240,128,128.128.128.136. 
183,192.192,192.240,140.130,129 
5370 DATA 35.57,191.213,170.213, 
170.213.170.212.169.130.132,136. 
144,144.144.144.128.128,135,136. 
144,160.192 



5380 DATA 35.65.240 

157,170,213,138,133 

128.128.128.128,128 

128.128.128,159,160 

160,160.192 

5390 DATA 28.66.188 

228. 196. 132. 133, 130 

128,128,193.186.140 

144.160.160.192.192 

192.192.192.176.144 

128.192.191 

5400 DATA 30.65.129 

133,132,132,132,130 

128.128.128,128,128 

128,128.128.128,128 

131,130.132.132,132 

5410 DATA 0.0 

5420 '5430 ' DATA B 

5440 DATA D. 18,35,1 

4,224,224,240,232,1 

0,129.129.129.130,1 

5450 DATA 17,35.129 

129,129,129,129.129 

128.128.128.128,128 

5460 DATA 27.35.224 

128,128,224.158,129 

5470 DATA 24,62,224 

192.128,128,128,128 

160.160,144.144.136 

136.136.136,136.136 

136,136,136,136.136 

160.160.192 

5480 DATA 21.72.240 

170.213.170,212.169 

169,210.164.200,144 

128.128,128,128,128 

128.128.128.128.128 

128.128,128,128,128 

130,132,132,136,144 

5490 DATA 21.75.191 

213.170,213,170,213 

213,170.213,170,213 

209.129.130.130.130: 

132,132,132,132,132 

132,132.132.132,132 

132.132.132,132.196 

133.133.130 

5500 DATA 22,68.131 

165,170.165,170.165 

165.170,165,170.165 

165.162.160,160,160 

160.160,160,160,160 

160,160,160.160,160 

132.130,129 

5510 DATA 0,0 



.141.131,134, 
,128,248.132. 
.128,128.128. 
.160.160,160. 

.194.146.178, 
.128,128.128. 
,133,134.136. 
.192.192.192. 
.136.128,128. 

.130,132.133. 
.130.130,129. 
.128.128.128. 
.128.128.128. 
.132.130.129 

LOCK FOR DUCK 

92,192.192.22 

96.130.146.13 

32,248 

.129.129.129. 

.130,132.248. 

,128.255 

.159.128.128. 

.152.166.193. 
.143.208.160. 
,136.136.136. 
.136.136.136, 
,144,144.160. 

,142,129.213. 

,213.169.213, 

.160.192.192. 

,128,128,128. 

.128.128.128. 

.128.129.129, 

.160.160.192 

.192.213.170. 

,170,213.170. 

.170.212.168. 

.132,132.132. 

.132,132,132. 

.132.132.132. 

.164.156,132, 

.132.137.146. 
,170,165.170, 
.170.165.170. 
,160,160.160, 
,160,160.160, 
.144,136.136. 
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PROGRAMMING BOOKS IN PRINT 



"Assembly Language Programming for the CoCo" (The Book) and the CoCo 3 (The Addendum). 
Professionally produced (not just skimpy technical specifications). THE CoCo reference books. 



THE BOOK - 289 pages of teaching 
assembly language for the CoCo 1 & 2. 
It's used as a school text and is an 
intro to Computer Science. It describes 
*Jae 6809E instructions, subroutines, 
interrupts, stacks, programming 
philosophy, and many examples. Also 
covered are PLAs, VDG, SAM, kybd, 
jystk, sound, serial port, and using 
cassette and disk. $18.00 + $1.50 s/h. 



THE ADDENDUM - Picks up 
where the BOOK left off. Describes 
ALL the CoCo 3 enhancements & how 
to use them with assembly language. 
The most complete GIME spec. 
WOW - Super-Res Graphics, 
Virtual Memory, New Interrupts, 
and more information not available 
elsewhere. Find out what the CoCo 3 
can really do. $12.00 + $1.00 s/h. 



COCO 3 SPECIAL 

Start your CoCo 
library right. 
See what the CoCo 
can really do and 
save money - buy 
the BOOK and 
ADDENDUM 
for only $27.00 + 
$2.00 s/h. 



US check or money 
order. RI orders 
add 6% sales tax 



TEPCO 

68 James Court 
Portsmouth, RI 02871 

See Us On DELPHI 
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Feature 



A utility that lets you print labels one at a time 



One Label or Two? 



by Kevin Deneen 



Why write another label 
maker program? There are 
lots of label programs 
available for the CoCo, 
and most are packed with 
features and reasonably priced. But this 
little gem has something the others don't — 
simplicity. 

Except at Christmas, I don't need to 
print a large number of labels at one time. 
However. 1 do quite frequently correspond 
with other computer hobbyists, authors and 
advertisers. What I need is a simple utility 
to print a label or two. then remain avail- 
able like any OS-9 command. 

The program Label is short and sweet. 
Its only function is to print a three-line 
label. Once it's compiled, you can place it 
in your CMDS directory. If you have Level II, 
you can merge it with Shel 1. Then when 
you boot your system. Label is in memory, 
working lightning fast every time you need 
it. If you have Multi-Vue, you can use the 
mouse to select Label from any directory, 
then select Open from the Files menu to run 
ii. In any case Label works on any CoCo 
with OS-9 Level I or Level II. 

To use Label, simply type the program 

Kevin Deneen holds an associate's degree 
in tool engineering and works for a large 
aerospace company as a numerical control 
machine tool programmer. Besides the 
CoCo, his other hobbies include flyfishing 
and mountain trail hiking. He may be 
contacted at 65766 E. Sandy River Lane, 
Rhododendron. OR 97049. ' 



name at the OS-9 prompt (e.g., 0S9 : 1 abel ), 
then press ENTER. You should have your 
printer online and paper or gummed labels 
ready. The program loads into memory and 
executes like any other OS-9 command. 
After loading, the program responds by 



prompting you to enter the name and ad- 
dress for the label. As soon as you've 
entered the ZIPcode, your printergoes into 
action, typing out your label. The program 
then prompts you to press ENTER if you 
want another label or ESC if you want to quit 



The Listing: label .c 

/* PROGRAM NAME: label.c */ 

/* By: Kevin Deneen */ 

/* Copyright 1989, Falsoft Inc. */ 
/* Keyboard enter and print single labels */ 

/* Defining a variable outside of a function allows it to be global */ 



(/Include <stdio.h> 
//define LEN 41 
//define LC 21 
//define LS 3 
//define LZ 10 
//define STOP EOF 

struct ldata [ 

char * 



/* Header file for input/output functions */ 

/* Maximum length of string for name S address */ 

/* String length for city */ 

/* " " " state */ 

/* " " M zip */ 

/* EOF - <CTRL> + <BREAK> */ 



}J 



*name[LEN], 

*address[LEN], 

*dty[LC]. 

*state[LS], 

*z1p[LZ]; 



ldata is a template for */ 
future definitions */ 



'mainO - calls all the other functions */ 



maint ) 



struct ldata label. *point21abel : /* Define structures */ 
1nt ch; /* Variable for reading keypress */ 

point21abel - &label: /* Get address of label structure */ 



while (ch !- STOP) 
( 



/* while <CTRL> + <BREAK> is not pressed */ 



enterit(point21abel ) : /* Send the address of 'label' to enterlt */ 
pr1ntit(po1nt2label ): /* Send the address of 'label' to printU */ 
printf("\nHit <ENTER> if you want another label."): 
printf("\nH1t <ESC> if you want to quit.Nn"); 
ch - getchar( ) : 
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the program. It should be noted that ESC on 
a CoCo 3 is accomplished by pressing the 
BREAK key while holding down the CTRL 
key. If you have a CoCo 1 or 2. use the 
CLEAR key in place of CTRL. 

When typing in your label data, be aware 
that as is, the name and address string 
length is set to 40 characters. The city string 
is set to 20, the state is set to 2, and the ZIP 
code to 9 characters. If you want, you can 
change these values by adjusting the define 
statements at the beginning of the program 
before compiling. Be sure to add 1 to the 
desired value for a null character. If you 
type in a string longer than the amount of 
space reserved, the system will not have 
room for the null character. Should this 
happen, the next string stored in memory 
will most likely be concatenated to the 
string that is too long, creating an odd- 
looking label. 

Although I have made no attempt to 
explain the program line by line. Label is 
commented for those who are unfamiliar 
with the C programming language. Feel 
free to add to or modify the program. □ 



/* End of main */ 

/* function to enter label data from the keyboard */ 



/* Define a pointer to the structure */ 



enterl t(data) 
struct Idata 'data; 
( 

prlntf ("Enter requested data after each prompt. \n\n") ; 

pr1ntf("NAME: "): 



gets(data->name j ; /* 

pr1ntf("\nADDRESS: "); /* 
getstdata->address) : 
pr1ntf("\nCITY: "): 
gets(data->dty): 
prlntf ("\nSTATE: "): 
gets(data->state) : 
pr1ntf("\nZIP CODE: "): 
gets(data->zip) ; 

} 

/* End of enterltO */ 

/* Function to print label 



Get keyboard. entry and store at */ 
address 'pointed to' */ 



*/ 



/* Define a pointer to label structure */ 



prlntlt(prlnt) 

struct ldata *pr1nt; 

{ 

FILE *ptr: /* 0S9 treats the printer as a file 

ptr - fopenC'/p", "w"): /* "/p" - name of path to printer 

fprlntf (ptr."%s\n",print->name) ; /* Print the label data that 
fpr1ntf(ptr."%s\n",pr1nt->address): /* is pointed to */ 
fprlntf (ptr."%s. %s %s", printOcity. print->state. pr1nt->z1p); 
fprintf (ptr."\n\n\n\n") ; /* 4 carraige returns */ 

fclose(ptr); /* Close path to printer */ 

) 

/* End of printitO */ 



*/ 
*/ 
*/ 
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Overlord New! 



Peace through superior firepower is the catch phrase in this 
sophisticated wargamcsimulaior.Victoiy shall not fall to he who is 
the mightiest, oh no, but to he who can plan ahead and develop the 
belter strategy. You must ensure that oil your troops arc brought 
into battle al the right moment, and for that you must set your most 
industrialized cities to producing troop transporters- Other cities will 
build Aircraft carriers, fighter jets, paratroop regiments, submarines, 
spy planes, battleships, destroyers, and cruisers. Up to three people 
can play the game simultaneously, each starting out al his own base 
city, each knowing nothing about the strenghis and locations of his enemies' forces. The player's own 
combat troops will head out, exploring the world as they go, capturing towns that lie waiting, or 
engoiging, the enemy face to face. You can set any or afl of the three players to be operated by the 
sinister silicon brain of your CoCo 3, and battle against them or let them battle each other. 

Price: $29 US / $34 Cdn. 

Overlord requires: 1281c CoCo 3, 1 drive and a mouse or joystick. 








t&u 





fec&ntti 
fntb 

WcVcsatdil before and we'll say 

il again: This is the best fantasy 

role-playing adventure (he CoCo 

has ever seen, bar none- A full 3 

Jim:', are filled with worlds, towns 
castles, and dungeons. The dungeons are spectacular 3D creations, filled with full colour, hi-res 
monsters, ladders, doors and pits, chests, pools, lava and flooded rooms. You would not believe thai 
a CoCo 3 could produce such high-speed detailed graphics. The dungeons are only part of the story, 
however. In the wild lands above, you'll find monsters, towns and castles. The towns will reveal 
merchants, learned locals, even a friend or two who will join your quest Maybe you will find band of 
pirates as you tread the windswept shores. Could you and your companions defeat them? Test your 
mettle during the hundreds of hours of plav time fhc Seventh Link will bring you. 

538 US/ $48 Cdn. Req: CoCo3, 40 track drive (RS drive is OK if it's white) 



Defendroid 

A classic returns! Arcade realism for the Coco 3 is 

brought one stejj closer with this outstanding 

action game. Sinister aliens are appearing in the 

skies over Zabburtuth, and you and your 

Turbo-Flier are all that stand in their way! Use 

lasers and smart -bombs, fuel depots and your 

astronaut-tractor to save the hapless inhabitants 

from certain stir-frying as hideous alien cuisine! 

This program contains a graphics manipulation routine so advanced, we 

registered a copyright for it alone. See what a threefold increase in software 

speed and memory efficiency can do foryourCoCo3! 

Price $29 US / $34 Cdn New! 

Defendroid requires: 128k CoCo 3, 1 drive. 1 joystick. 





CC|U 



oysti 



Culadu ri l I II; Wva Uicrelvne's End 

"Some of the best 

graphic! to be seen on 

a CoCo 3" will lead 

you through a land of 

mystery, as you 

attempt to discover 

the Talc of the 

Weathers tone. 

Smooth scrolling 16 

colour graphics and a 

sophisticated command interpreter lend realism 

and enjoyment to one of the most extensive 

adventures to be found on a CoCo. Package 

includes 2 discs, an 1 1x17" map, a velvet pouch of 

powcrstones and a 20 page booklet. ^ 

Price: S32 US/ S38 Cdn K» 

Requires: 128k CoCo 3, 1 drive 







New! Those Darn Marbles 

Dedicate a program to 5 12k machines only, and all sorts of new 
things are possible. Those darn Marbles is the first CoCo game to 
use the built-in hardware screen scrolling features of the CoCo 3. 
This means that all the computer's lime en be dedicated to 
controlling the game itself (sound effects, moving objects around, 
etcetera) rather than the time-in tensive chore ofscrollingan entire 
32k screen around. You will be amazed to see how smoothly a 
HARDWARE-scrolled screen can move. Compare Those barn 
Marbles with any other 3D marble tvpe game on any computer, and 
you will be convinced chat your CoCo 3 really can stand with the 
best of ihem. (One of our playiesters remarked, upon seeing the pre-release version of TDM: "My 
Arnica isn't that smooth!') 

Not convinced? TDM is so chock-full of graphics (hat it comes on (count 'em) six discs! 
It's been said many times, hut this time it's true: Your CoCo 3 game library is not complete 
without a copy of Those Darn Marbles. 

Price $32 US / $38 Cdn. Requires: 512k CoCo 3,1 drlve.joystick. 




Hint Books! 

Finally, help is here! Calduril 1 and 2 books are 
15 pages and S3.50 each. The Seventh Link 
books are <I0 pages (lots of maps) and S5.50. 



audio signal is captured (dlgitlzed)wilh the 
supplied cable, (or make your own, or use a 
MaxSound cable), and recorded In CoCo's 
memory. You may then manipulate the 
sounds with the audio clipboards, reverse. 
combine, etc. You may also include the 
sounds in your own BASIC programs. 
S54 US/S64 Cdn wilh cable S39/S49 wo 
Requires: i28kCoco3.df.ve, mouse/joystick 

Sound Effects Packs 

Load these sound effects into Studio Works: 
FX1: General (4 discs, 12smpls) S14 512k 
FX2: Animals (3 discs, 1 l smpls) £14 ree'd 



Oblique ftriab 

32 Church St., Georgetown, Ontario, CANADA, L7G2A7 

(416) 877-8149 

Wc accept: MasterCard, Amex, Personal cheques and Money Orders. 

COD in Canada only. Please add $2.50 shipping to all software orders, 

$1 to all book-only orders. Ontario residents please add 8% tax. 

Call or write for a free catalogue. 
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Feature 




One of the few ways to really enjoy Newtonian yhysics 

What 
Goes Up . . 



by Hector F. Cuadra 



Gravity is an Extended Color 
basic educational game that 
provides practice and simu- 
lation in one of the most 
fundamental concepts of 
Newtonian physics — gravity. It simulates 
the parabolic motion of any object under 
the influence of an initial arbitrary force 
and the force of gravity. The game's objec- 
tive is to try to hit the target by predicting 
the patli that a projectile will take. You do 
this by specifying the initial velocity and 
elevation angle. From then on, there is no 
influence on the object except the accelera- 
tion due to gravity (a constant). The trick 
for solving the problem is to separate the 
motion of the projectile into vertical and 
horizontal components. 

After you type RU N, the program draws a 
PMODE 4 picture while displaying the title. 
After this two instruction screens appear. 
After the last instruction screen the data 
input screen gives the position of the target 
and allows you to view the picture. Typing 
H at the Want a View prompt sends you to 
the Help/Solution screen. When viewing 
the picture, press any key to bring back the 

Hector is a graduate student in education 
whose main interest is using computers as 
alternatives to traditional methods of learn- 
ing. He has degrees in science and art and 
finds the computer perfect for combining 
the two subjects. He may be contacted at 
1336 E. Mifflin, #3, Madison, Wl 53703, 
(608) 255-0814. 



Data Input screen and proceed with the 
velocity and angle data. Using the horizon- 
tal distance and height where the target is 
located, you calculate or try different 
combinations of velocities and angles for 
the launch of the projectile. In this mode 
you have the option of making the entire 
path of the projectile visible or just plotting 
it momentarily. This is helpful when your 
paths tend to lie on top of one another, 
making it hard to see the recent path. If you 
commit an error entering the data, don't 
worry because you have an opportunity to 
change it. Once you have entered the cor- 
rect data, the PMODE 4 picture is displayed. 
The stone or bullet (you name it) is at the 
mercy of the gravity force and the initial 
velocity. A ground-to-ground path is plot- 
ted according to your data. Whatever the 
consequences of the initial data entered, a 
Results screen is displayed at the end of the 
trajectory. 

You are allowed three shots per target. 
Hitting the right target gives you 100 points. 
If by chance you hit the wrong target, the 
big building, you are penalized by losing 
100 points. If you score by hitting the tiny 
box. a new position for the target is given to 
you, plus an extra shot. If you miss three 
consecutive shots, you are sent to the menu 
screen. 

In the menu section you have the option 
of finding the solution to the motion prob- 
lem for the last target you missed. Also, 
you can review the results or instructions or 
view the plot of past attempts. Since you 
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Frank Hogg Laboratory 



14 Years of Service, Support, and Friendly Help! 

Happy New Decade 



BOOKS 



NEW 
A FULL TURN OF THE SCREW 

by Tony DiStefano 
$19.95 



START OS/9 

An Enjoyable, Hands-On Guide 

To OS-9 Level II 

$32.95 Book and Disk 



Inside OS9 Level II 

"authoritative and comprehensive 

look inside OS-9 Level II for the 

CoCo" Rainbow '89 

SPECIAL ONLY 29.95! 



DynaStar 



THE Most Popular OS-9 
Word Processor! 

"II is an excellent word processor lor business 
and home use, whether for clerical or program- 
ming work." RAINBOW Review April 1 989, Page 
34. Also see July 1984, Page 220. 

FEATURES: Best OS9 editor/word processor/ 
rexl formatter, has everything you would expect 
and more, supports terminals and windows si- 
multaneously, auto-configurable, auto-indent for 
C and Pascal, mail merge for form letters. 

Pop-up help menus that can be disabled. 
WordStar command style. Files larger than mem- 
ory. Block manipulation, mark, move, copy, de- 
lete, read from disk, write to disk. Keyboard Mac- 
ros, (up to 29) to produce any key sequences, 
including commands! 

Supports multiple printers. Formatting Com- 
mands: Justification, word wrap, centering, head- 
ers, footers, macros, odd and even support, mul- 
tiple index generation, multiple table of contents 
generation and morel 

DynaStar word processor/formatter4€&GO 

SPECIAL ONLY 79.95 



DynaSpell 



by Dale Puckett 

20,000 & 102,000 word dictionaries included. 
Fast, slick, the best spelling checker available for 
OS9. Written by RainbowTech columnist Dale 
Puckett. 

DynaSpell spelling checker 75.00 

SPECIAL WHEN PURCHASED 
WITH DynaStar 15.00 



The Wiz 



"The Wiz: Unquestionably one of the 
finest OS-9 terminal programs availa- 
ble. " , "The Wiz has it all. " 
List $79.95 
Now on SALE for ONLY $39.95! 
(Includes WizPro shareware disk) 



Hard Drive Systems 



"Frank Hogg Laboratories has been 
selling hard-drive systems longer 
than any other RAINBOW advertiser" 



Burke and Burke 

Burke & Burke based kit includes: Burke & 
Burke (B&B) XT PC interface. Hard drive with 
controller, 3 foot ST506 cable set. Hard Drive 
Case with 60 watt power supply and fan. 
Includes OS9 LI and Lll soltware. 1 megabyte 
transfer in only 45 secondsll Twice as fast as 
olher systemsType ahead under OS9. (No halt) 
Complete instructions. Easy one evening 
assembly. 

20 Meg Kit 40 MS Complete 465.00 

30 Meg Kit 40 MS Complete 515.00 

40 Meg Kit 28 MS Complete 595.00 

Assemble Imt & test any of the above 50.00 

B&B OPTIONS: 

B&B Real Time Clock (add to above) 30.00 

B& B XT ROM Auto Boot from hard disk 1 9.95 

B&B Hypor I/O DECB on hard drive 29.95 

B&B Hyper III Ramdisk/spooler 19.95 



The Eliminator™ 

The Eliminator 7 " based kit includes Bruce 
Isted's new interface 'The Eliminator''" the 
Western Digital WD 1002-05 high speed 
controller. Features; fastest system available, 1 
megabyte transfer in only 37 secondsll More 
than twice as fast as other systems! Supports 4 
floppy and 3 hard drives, type ahead (No halt) 
for both floppy and hard disk, autoboot OS9 
L1 or L2 from hard or floppy disk, 2 serial ports, 
1 parallel port and Real Time Clock socket. 
Hard drive with WD 1002-05 controller, ST506 
cable set, 3 foot 40 pin cable, Hard Drive Case 
with 60 watt power supply and fan, OS9 software 
for LI and Lll with source, Complete instructions. 
Easy one evening assembly. 

20 Meg High Speed Kit 40 MS 779.00 

40 Meg High Speed Kit 28 MS 699.00 

70 Meg High Speed Kit 28 MS 1299.00 
Assemble fmt & Test any of the above 60.00 

Eliminator OPTIONS: 

Real Time Clock chip 30.00 

Serial cable set (2 DB25) 30.00 

Parallel cable (Centronics) 30.00 

Floppy Cable Int & Ext 25.00 



Hard Drive Bits 
and Pieces 



The Eliminator'" NEW PRICE 159.95 

See Eliminalor OPTIONS also 

WD1002-05 Controller 199.95 

B&B XT PC style interface 69.95 

B& B XT RTC interface w/clock/calendar 99.95 

See B&B OPTIONS also 

Hard Drive case with 60W P/S & Fan 89.95 

SPECIFICATIONS' size 1 6 - Hoop. 5.S - high, r wide. 60 Won 
power supply with 3 drive type powor connecters, quiel 1 2 volt 
DC Ian. LED pewor indicator, color mafches CoCo. Holdo 2 
1/2 height hard or (loppy drives ond has card guided spaco lor 
a PCS tho size ot a drive (like the WD1002-05 contr oiler) 



FBU Fast BackUp NOW ONLY 
R.S.B. RS Disk Basic under OS9 



35.00 
39.95 



Floppy Drives (5.25" and 3.5 FLOPPY DISKS) 

TEAC High Quality Drives - 1 Year Warr. 

FD55B 360K40 Track DS 5.25" 118.00 

FD55F 720K 80 Track DS 5.25: 151.00 

FD35F 720K 80 Track DS 3.5" 117.00 

(Bare drives, requires case and power supply) 



CRC/Disto 



512K with 512K chips and software 99.00 

512K for CoCo 3 Zero K with software 25.00 

Mini Controller 75.00 

Super Controller I 99.00 

Super Controller II (No Halt) 130.00 

4 in 1 (RS 232, Paraller RTC and HD) 130.00 

3 in 1 (RS 232, Parallel and RTC) 75.00 

HD adaptor 40.00 

HD adaptor with RS 232 70.00 



Alpha Software 



OS9 Level II BBS Release 3.0 29.95 

Preslo - Partner 29.95 

Level II Tools 24.95 

Disk Manager Tree 29.95 

Multi-Menu 19.95 

Warp -One 34.95 

TheZapper 19.95 



PC Keyboard Adaptor 



Bob Puppo's PC Keyboard adaptor 99.00 

(PC Keyboard extra) 

Kit versions available Call 



Call for Software/Hardware 



Frank Hogg Labs is looking for soft- 
ware and hardware for CoCo OS/9 
and OS9/68000. FHL is the worlds 
oldest and largest OS/9 distributor! If 
your products qualify they will have 
access to the worlds largest OS/9 
user base! Why wait, call now! 

Call Frank Hogg at 315/469-7364 



ORDERING INFORMATION 



VISA and M/C, check and COD. 
Contential U.S. software shipping add 
$3.50 Ground - $6.00 Two Day Air. 
Hardware add $1 1 ground - $22 Two 
Day Air. Please call for Next Day Air 
costs and C.O.D. Foreign add 10% 
Shipping (Minimum $5 USD). NY 
residents please add 7% sales tax. 

Frank Hogg 
Laboratory, Inc. 

Since 1976 

NEW ADDRESS 

204 Windemere Road 
Syracuse, NY 13205 



Call 24 HOURS 
315/469-7364 



missed three consecutive shots, the menu 
offers you the option of selecting a new 
target. With this option you can choose an 
easy or a hard target. To try again, press 2 
and the sequence starts over. Option 3 is for 
rebuilding the picture and erasing the accu- 
mulation of trajectories. If you have a prob- 
lem with cluttering paths in the screen, 
choose Option 3. Options 1 . 3. 4. 5 and 6 
always return you to the menu. 

Program Structure 

The three important concepts employed 
in this program are the PCOPY and PPOINT 
commands and the use of screen areas 
simulating real areas. The PCOPY command 
allows you to duplicate the initial graphics, 
drawn on pages 1 through 4. to pages 5 
through 8. With this I am able to erase the 
paths and repair the picture by just copying 
back the original picture located at pages 5 
through 8 in memory to the pages used by 
PMODE 4.1. The PPOINT command tests 
whether the location of the projectile is 
white. If the pixel is white, it is tested to see 
what type of obstacle it is. further testing is 
done by finding the numerical value of the 
area where the point or target is located. 

The program variables are divided into 
two categories. The game status category 
includes those that decide the sequence of 
the program execution according to points 
or number of attempts. 



Game Status Variables: 



J-1 


by-passes instructions 


..- -' « - "' 


initially 


ZZ-1 


lime for new target <& 




100 points 


TR.-1 


new target, but loses 


: 


100 points 


N$ 


menu's subroutines 


TL 


number of tries 


TT 


score 



The mathematical variables are those 
used in the simulation to calculate the 
position for the projectile and target. These 
are as follows: 



Pi 
G 



A$.A1,A,B 
TM 




circle's constant 
acceleration of gravity. 
constant 
time interval 
angles 

time at peak of path, 
1/2 time 
initial velocity 
physical position or 
projectile 
screen mapping 
corrections of X,Y; 
position of target 
■■ . ■ .■ ■ 



EXEC 44539 on Line 
1540 waits for a key- 
board input (it functions 
just the same as 
A$=INKEY$. POKE 13,0 
in Line 90 is used to 
reset the last INKEY$ 
value to null (the same 
as 1NKEY$-""). Line 450 
contains the high-speed 
poke POKE 65495.0. 
This poke is used to 
double the speed of all 
functions during the 
plotting of the trajec- 
tory. If you have a CoCo 
3, change this to POKE 
65497.0. Also, during 
the initial drawing of the picture and succe- 
sive target positioning, the high- and nor- 
mal-speed pokes are used to speed up those 
sections in the program that lend to be slow 
in processing. Meanwhile, during data input 
and observation, the normal-speed poke at 




lines 820 and 1408, POKE 65494 . 0, is used 
to avoid an impatient or too-sensitive key- 
board, as well as to to cool the computer 
chips. To slow the CoCo 3 down to normal 
speed, use POKE65496.0. Q 





32K ECB 


^ 








1 


7— 




40 PRINT@168. "parabolic": :PRINT@ 
178,"moti on" ; 






i / 






V 


70 


.222 


50 PRINT@238."BY";:PRINT@264," H 








150 


.212 


ECTOR CUADRA"; :PRINT@296, "1336 E 






230 


.145 


.MIFFLIN" ; : PRINT@330, "MADISON WI 








285 


...51 


";:PRINT@365. "53703": 

70 IFN$-"7"THENENDELSEJ=0:GOSUB1 




345 


. 10 






380 


.216 


200 






520 


...68 


90 FORN=1TO10:PLAY"L255;O5:CEGC" 






600 


204 


: NEXT: J-l :POKE135,0:GOSUB6000 








710 


.111 
.151 


100 **************************** 
110 ' instructions 




840 






910 


.198 


120 CLS:PRINT" kinematics of 






970 


...45 


a particle":PRINT STRING$(32.246 






1040 


...29 


): 






1150 


...79 


130 PRINT" PATH OF A N0N-SELFPR0 






1240 


.192 


PELLED OBJECT NEAR THE EARTH" 






1300 


.175 


S SURFACE":PRINT"WITH NO AIR OR 






1370 


...88 


WIND RESISTANCE.": 






1500 


. 50 


140 PRINT" YOU CHOOSE THE INITIA 






1571 


.233 


L VEL0CITY":PR1NT"AND THE ELEVAT 






1735 


...54 


ION ANGLE •A'":PRINT"AB0VE THE H 






2010 


...61 


ORIZON." 






3135 


...19 


150 PRINT"THE HORIZONTAL C0MP0NE 






6110 


...32 


NT OF THE":PRINT"INITIAL VEL0CIT 






END . 


249 


Y IS V*C0S(A).":PRINT"THE VERTIC 

AL ONE IS V*SIN(A)." 

160 PRINV'HORIZONTAL DISTANCE TR 
















AVELED IS":PRINT"V*(C0S(A)*T WHI 




The listing: GRAVITY 




LE ITS":PRINT"HEIGHT IS V*SIN(A) 
*T-.5*G*T*T." 




'COPYRIGHT 1989. FALS0F1 


INC. 


170 PRINT STR1NG$(32.246); 




10 CLEAR300:PCLEAR8:SOUND155.1 


180 G0SUB 1530 




20 PMODE4.1:PCLS(0):PMODE4 


.5:PCL 


200 CLS:PRINTSTRINGS(32.246): 




S(0):CLS(4):COLOR5.0 




210 PRINT:PRINT"Y0UR CANNON IS A 




30 '-A*************************** 


T THE LEFT SIDE OF THE SCREEN." 




32 ' constants 




220 PRINT"Y0UR TARGET IS THE LIT 




34 S 1 $-"#### .#" : S 2 $-"##### . #" : S 


TLE BOX". "ABOVE THE ARROW." 




3$-"##":PI-3.1416:G-9.8 




230 PRINT"PLEASE. DO NOT HIT THE 




3g > **************************** 


LARGE", "BUILDING AT YOUR RIGHT. 




38 ' <TITLE> 




" 




39 PRINTO108. "GRAVITY"; 




240 PRINT"THE HORIZONTAL SCALE A 





V 114 



THE RAINBOW January 1990 



T THE "."BOTTOM OF THE SCREEN IS 





560 Y-T*V*SIN(B)-(G*T*T)/2 


"."CALIBRATED IN 10 METERS/LINE. 


360 PRINT@288. "ELEVATION angle(0 


570 X=(V*COS(B))*T 


•• 


-90 DEG)-";:LINE INPUT A$:SOUND2 


575 'screen mapping formulas 


242 PRINT-FOR HELP ENTER 'H' AT 


00.1:IFA$-""THEN360 


590 Y-Y1-(Y*.792) 


'VIEW. ...GOOD LUCK!" 


365 A-ASC(A$):IF(A<480RA>57)ORVA 


600 X-Xl+X 


250 GOSUB 1530 


L(A$)>90THEN360 


610 IF Y-<0 AND X-<255 THEN 550 


255 **************************** 


370 V-VAL(V$):A-VAL(A$) 


620 IF X>-255 OR Y>-180 THEN 810 


258 " game status 


380 PRINTO320. "LEAVE PATH?";:INP 


: 'overshoot! 


260 IF N$-"4"THEN 950 


UT"(Y/N)";Q$:SOUND200.1:IFQ$-""T 


630 IF (X>-XT AND X<XT+7) AND (Y 


285 IF ZZ-1 THEN1330: 'new target 


HENQ$-"Y":PRlNT@337."y" 


T-6<Y AND Y<=YT) THEN GOTO 1110 


295 ZZ=0: 'reset record of target 


390 IFQ$-""THEN400ELSEIFO$O"Y"A 


640 IF PPOINT(X.Y)-5 GOSUB 690:' 


300 SOUND 200.1: SOUND 255.1 : I FTR 


NDQ$O"N"THEN380 


checking for obstacles 


-1GOSUB1330 


400 PRINT@352."IS DATA OK?";:INP 


650 PSET(X.Y.5):'plot 


305 **************************** 


UT"(Y/N)":A$:SOUND200,1:IFA$-""T 


660 IF Q$-"N" THEN GOSUB 1570 


308 ' data Input 


HENA$-"Y" : PRINT@369 , "y" : FORP-1TO 


670 GOTO 550 


310 CLS4:PRINT@0.STRING$(32,182) 


500:NEXT 


680 '*************************** 


J 


410 IF A$-"N"THEN310 


690 ' obstacles 


320 PRINT@42. "input data";:PRINT 


415 TL-TL+1: "number of chances 


700 IF (X>204 AND X-<233) AND Y> 


@64. STRING$(32.165): 


420 IF A$-"Y" THEN 450 ELSE 400 


=145 THEN 740 


330 PRINT" [MKS-SYSTEM. METER 


430 **************************** 


710 IF PPOINT(X+l.Y)-5 AND PPOIN 


S/SEC.]" 


440 ' display 


T(X-l.Y)-5 THEN 1575 


340 PRINT"/OUR TARGET IS";XT-7;" 


450 PM0DE4 . 1 : SCREEN1 . 1 : P0KE65495 


720 RETURN 


METERS AWAY ":PRINT"AT A HEIGHT 


.0:COLOR5.0 


730 **************************** 


OF ";:PRINTUSINGS3$;155-YT: : PRIN 


470 • *************************** 


740 ' wrong target 


T" METERS.":PRINTSTRING$(32.45); 


475 'degrees to radians 


750 F0RPM-1T04:SCREEN1.1:PM0DEPM 


342 INPUT"WANT A VIEW (Y/N/H)":B 


510 T-0:B-(PI/180)*A:A1-B 


. 1 : SOUNDPM*50. 1 : NEXTPM : CO-5 : SCRE 


$ 


520 TM-(V*SIN(A1))/G:'half time 


EN1.1 


345 IFB$-"Y"THEN GOTO 1424 


530 **************************** 


755 IF ZZ-1 THEN 1135 


346 IFB$-"H"THEN1700 


540 ' plotting 


760 FORR-1TO40:CIRCLE(219.150).R 


347 B$="N" 


545 ' formulas 


,CO:GOSUB780:NEXT R:GOTO790~~ 


348 SOUND200.1 


548 GOSUB 3000 


780 CIRCLE(219.150).R.0:RETURN 


350 PRINT@256. "INITIAL LAUNCH ve 


549 'time intervals 


790 POKE65494.0:CLS(4):PRINT@234 


locity? -"; : LINE INPUTV$:SOUND20 


550 PLAY"L255;05:C":IF V>100 THE 


. "*wrong*target*" ; : PLAY"L4 ;01 ; CC 


0.1:IFV$-""THEN350 


N T-T+.01 ELSE T=T+.l 


E;L1;C":TR-1:TT-TT-100 


355 V-ASC(V$):IFV<480RV>57THEN35 


555 'motion formulas 


800 '*************************** 



QUALITY COCO-3 DISK SOFTWARE 

SUF>EFlSOUND Real MULTITASKING sound/animation 
with CM3 graphics. DOUBLE the recording time without 
distorting compression & more possiDie in 2 track mode 
The EASIEST and MOST powerful 1 digital sound available. 
Nothing to write down or forget. Unmatched tor QUALITY & 
RELIABLILITY and EASE of use. REAL audible cuing and TRUE 
SOUND with SOUND. Nothing extra to buv. b<*ainer to hacker. 
Support available for users with ltnea DISTO ram upgrade. 
SEE ADD pg.5! in the NOV. 89 RAINBOW for comparison chart. 
By J.D.Walker CiMCY &39.&S 

S , A'£'Br'7"£'# 1 prerecorded TOOL sounds for animations. 
More coming soon! O/VX. V .ST-^ . &S 

SUF'&JRSHOW The oerfect mate for SUPERSOUND. 
A slide shew format that supports MGH and CM3 graphics 
in any mix. with or without sound ana/or animation. 
RS-DOS patches included for double 3ided disk operation. 

OJVZ,V SJ.2.&S 

CJZ.T~Z3AE?D The BEST assembler/dlsasembler available 

for the CoCo3. TWO work buf Eers.onl ine help file and true 
source code disasembler make this a MUST HAVE for the M/L 
programmer. You do need the R/S EDTASM» cart, to make a 
workina disk. Supports real 60 col i.'oCoj display & disk. 
By Randel REID ONL. V &22. SO 



WHEEL, o f EA TE 
by ROBERT GANTON 



Wheel of fortune tvoe aame . 
O/VX. y & J. 3 . s>s 



STAR"MftX2 . O The easv to use graphics printer 
utility for the STAR NX1000 Ra inbow . Bf.W or FULL COLOR. 
Supports HSCREEN2.MGE and single or DOUBLE screen CM3. 
Full & quarter size prints. MIRRORi reversed/upsidedowni . 
Print B&W or COLOR LETTERHEADS . LOGOS and more! With 
NEW loader/editor -The easiest. Dest rrameable prints, 
by J. D. WALKER O/VZ. V SJ.9.SI5 



CGF> "P4A X3 . O 
J.D.WALKER 



COLOR ONLY VERSION FOR CGP-220 



supsRsorr. inc 

363 OAKWOOD AVE. 
JACKSON. MI 49203 
(5171 787-3610 



shippma S2. 50/order 
M/C VISA. MO. CHECKS 
■ all items in stock for shlDping 
ATTENTION PROGRAMERS top royalties 
guaranteed for top quality programs. 




PROGRAMS* PERIPHERICS' SUPPLIES • SERVICE 



Fast Delivery... 
Friendly Service 

Now in our 7th year! 



/iwxtex THacUnU 



A VA TEX 2400e just $125! 




Avatex1200e $79 

with Coco Cable 89 



/^\ 




Avatex2400e $125 

with Coco Cable 135 

(Coco 3 only) 
with RS-232 Cable" 140 



Avatex1200e, Cable 
AUTOTERM... $119 



I JB 



Avatex 2400e, Cable 
AUTOTERM... $165 



•Coco 1,2 requires Deluxe RS-232 Pak 



- Call - 
513-396-SOFT 



Igxnaza I 



2235 Losantiville. Cincinnati. OH 45237 

SHIPPING will b« charged *l out ACTUAL COST 
Ohio residents add 5.5% Sales Tax COD add 2.50 
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810 ' results 

820 SOUND200.1:POKE65494.0 

830 CLS:PRINT" *result 

s*":PRINT STRING$(32.150): 

840 PRINT"INITIAL VELOCITY-" ; V ;" 

M/S":PRINT"ELEVATION ANGLE- "; 

A;"DEGREES" 

850 PRINT"HORIZONTAL RANGE-";: PR 

INT USING S1$:X-7;:PRINT" METERS 

II 

860 PRINT"ALTITUOE RANGE-":: PR 

INT USING S1$;155-Y;:PRINT" METE 

RS" 

880 PRINT"MAXIMUN HEIGHT -" : : 

PRINT USINGS2$;V*S1N(A1)*TM-(G*T 

M*TM)/2:: PRINT" M." : PRINT" POSS I B 

LE MAX RANGE-":: PRINT USING S2$: 

2*TM*V*C0S(A1);:PRINT" M." 

900 PRINTSTRING$(32.190)::PRINT" 

TRAVEL TIME : " : : PRINT USING S 

2$;T;:PRINT" SECS." 

910 PRINT"PEAK REACHED AT:";:PRI 

NT USING S2$:TM::PRINT" SECS." 

912 PRINT"YOU MISSED";TL; "OUT OF 

3" 
914 PRINT"YOUR SCORE IS":TT 
916 PRINT;3-TL:"TRIES LEFT":PRIN 
TSTRINGS132.150): 
920 S0UND1.5 
930 GOSUB1530 
932 IFN$-"5"THEN950 
935 IF TL<3 THEN 258 
940 ■ *************************** 

950 ' menu 

952 TL-0 

960 CLS:PRINT@12."*menu*": PRINT 

STRING$(32,150)::PRINT 

970 PRINT" (1) TO VIEW PLOT AND 

ANY KEY "." TO RETURN TO H 

ERE." 

980 PRINT" (2) TRY AGAIN. SAME T 

ARGET?" 

990 PRINT" (3) ERASE OLD TRAJECT 

ORY" 

1000 PRINT" (4) REVIEW INSTRUCTI 

ONS" 

1010 PRINT" (5) REVIEW RESULTS" 

1020 PRINT" (6) NEW TARGET POSIT 

ION" 

1030 PRINT" (7) QUIT" 

1035 PRINT" (8) SOLUTION" 

1038 PRINT" score 

":TT 

1040 PRINT STRING$(32,150)::PRIN 

T 

1050 PRINT"CHOOSE A NUMBER. FROM 

(1-8)": 
1060 N$-INKEY$:IF N$-""THEN GOTO 

1060 
1070 ON VAL(N$) GOTO 1424.258.13 
30.100.810.1330.2000,1700 
1080 SOUND1.1:GOTO950 
1110 ************************** 

1120 ' on target 

1130 PSET(X.Y.5):S0UND1.1:ZZ-1:G 

OTO750 

1135 FOR R-l TO 10: CIRCLE(XT+3. Y 

T).R.5:GOSUB1140:NEXT R:GOTO1150 

1140 CIRCLE(XT+3,YT).R.0:RETURN 

1145 POKE65494.0 

1150 PLAY"L4 : 03 ; CEGFACGB" : FORN-1 

TO200STEP10:CLS<2):PRINT@234."* 

right on *"; .-SOUNDN, 1:NEXTN 

1160 TT-TT+100:TL-TL-1:GOTOS00 

]190 *************************** 



1200 ' picture drawing 
1210 PCLS:PMODE4.1:POKE65495.0 

1214 *************************** 

1215 ' landscape 

1220 DRAW"BM0,155;R60;E5;R4;E4 : R 

2 : Ul : R2 ; E3 : R6 : Dl ; Rl ; E3 : Rl ; E5 : R2 : 

U 1 : R2 : Ul ; R7 ; E7 : R2 ; Dl ; R3 ; Dl : F9 : Rl 

:R2:D1;R3:D2:R5;D1:R1;F10:R3;F4; 

R20;D2:F8:R2:U2;E4:R3;E3;R60" 

1230 PAINTC10, 191) .5,5 

1240 DRAW"C0:BM0.155;D36;R255;U3 

6":DRAW"BM0.180;R255" 

1250 FORST-0TO255STEP10:ST$-STR$ 

( ST ) : DRAW"BM0"+ST$+" . 185 : U10" : NE 

XTST 

1252 CIRCLE(10.188).3:LINE(110.1 

90)-(110.185).PSET:LINE(210,190) 

-(210,185).PSET 

1255 FORS-1TO255STEP10:PSET(S.RN 

D(140).5):NEXTS 

1260 ' ************************** 

1270 ' building 

1280 DRAW"C5;BM205.155:U10;R10;D 

5;R15;D5":PAINT(210.150).5.5:DRA 

W"C0:BM205.147:R10;U1;L10" 

1290 CIRCLE(210.145).5,5.1,.5:PA 

INT(210,143).5.5:DRAW"C0:BM205.1 

55:R25" 

1300 DRAW"C0:BM5.155:D5R2E7" 

1305 *************************** 

1308 " picture duplication 

1310 PCOPY1T05:PCOPY2T06:PCOPY3T 

07:PCOPY4T08 

1320 *************************** 

1330 ' random target 

1332 PC0PY8T04:PC0PY7T03:PC0PY6T 

02:PCOPY5T01 

1334 SCREEN1.1:TR-0:IFN$-"3"ORN$ 
-'M"THEN1370 

1335 XT-RND(230)+20:YT-170:1F XT 
>198 AND XT<235 THEN1335 

1350 IFPP01NT(XT.YT)-5THENYT-YT- 

1 

1360 IFPPOINT(XT,YT)-5THEN1350 

1370 TA$-"BM"+STR$(XT)+"."+STR$( 

YT)+";U3R2U2R2D2R2D10U7L5U1:C0;R 

4U1L4" 

1380 DRAW "C5:"+TA$ 

1400 DRAWC0 : BM M +STR$( XT+3 )+" . "+ 

STR$(YT+10)+";G3E3F3H3D80" 

1405 GOSUB 3000 

1406 IFQQ-1THENQQ-0:RETURN 
1408 POKE65494.0:IFJ-0THEN90 
1410 IFN$-"6"0RN$-"3"THEN 1424 
1420 G0T0295 

1422 *************************** 

1424 ' view 

1425 SOUND150.1 :SCREEN1 .1 

1430 ************************** 

1490 ' checking keyboard 
1500 SOUND240.1 :SOUND100,1 
1510 A$-INKEY$:IF A$-""THEN GOTO 
1610 ELSE 1515 
1515 IFB$-"Y"THEN 308 
1520 SOUND200,1:GOTO950 
1530 PRINT@480. "'press any key to 
continue": 
1540 EXEC44539:POKE135.0:SOUND20 
0.1: RETURN 

1550 *************************** 
1560 ' no path shown 

1570 SOUND255.1:PSET(X.Y.0):RETU 
RN 

1571 *************************** 

1572 ' ground contact 



1575 SOUND1.20:GOTO810 

1580 *************************** 

1700 * solution 

1705 CLS(0):PRINT"possible solut 

ion":PRINT 

1708 PRINT032. "target at":XT-7:" 
meters" : 

1709 PRINT@64."and";:PRlNTUSlNGS 
3$: 155-YT: : PRINT"meters height": 

1710 PRINT@128.">": :INPUT"YOUR D 
ISTANCE FROM TARGET" ;DI 

1720 PRINT: INPUT-HEIGHT OF TARGE 

T-";HE 

1730 PRINT: INPUT"SHOOTING ANGLE 

(0-90DEG)":AN 

1735 AN-AN*(3. 1416/180) 

1736 HE-HE-X1+7 

1740 T— 9.8*DI*DI:B-2*HE*C0S(AN) 

*C0S(AN)-2*DI*COS(AN)*SIN(AN) 

1742 IF B-0 THEN PRI NT"***D I V 1 S 1 

ON BY !. TRY AGAIN***" : :S0UND1 

.30:GOTO1700 

1745 IF (T/BX0 THEN PRINT"***SQ 

UARE ROOT OF NEG. NUMBER!**" :SOU 

ND1.30:GOTO1700 

1750 PRINT"TRY THIS VELOCITY..." 

::PRINT USING S1$:S0R(T/B) 

1790 GOSUB1530 

1792 IF B$-"H"THEN308ELSE960 

2000 *************************** 

2010 CLS(0):PRlNT@ll."*thank*you 

*";:SOUND200.1:GOTO40 

3000 *************************** 

3050 ' cannon 

3100 A2-A:COL0R 0.0 

3105 IF J-0 THEN LINE(7.151) - ( 11 

.15D.PSET ELSE LINE(7 ,151 )-(Xl. 

YD.PSET 

3110 A2-(3.14/180)*A2 

3120 Xl-7+(7*C0S(A2)):Yl-151-(7* 

SIN(A2)) 

3125 COLOR5.0 

3130 CIRCLE(7.151).4.5:LINE(0.15 

5)-(7.151),PSET:LINE-(Xl,Yl),PSE 

T 

3135 RETURN 

6000 'subroutine of parabola w/ 

vectors 

6030 SCREEN1.1 

6060 V-45:A-45 

6080 T-0:PI-3.1416:G-9.80:B-(PI/ 

180)*A 

6090 T-T+.2 

6100 V-45:A-45 

6110 X-T*V*COS(B) 

6120 Y-T*V*SIN(B)-(G*T*T)/2 

6130 X-X+10: Y-155-Y 

6140 XP-X:YP-Y 

6150 IFY>155THEN7000 

6160 XF-X+V*COS(B) 

6170 YF-Y-(V*S1N(B)-G*T) 

6180 IF YF<0THEN YF-Y+V*SIN(B)+G 

*T) 

6190 PSET(X.Y.2):SOUND200.1 

6200 GOSUB 6250 

6210 GOTO 6090 

6240 ' 

6250 LINE(X.Y)-(X.YF).PSET 

6260 LINE(X.Y)-(XF.Y).PSET 

6270 PSET(XP.YP.2) 

6280 RETURN 

7000 *************************** 

7010 ' BACK TO INSTRUCTIONS 
7020 QQ-1:GOTO1330 
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Are Your Programs 
Headed for a Breakdown? 



by Dale L.Puckett 

Contributing Editor 



You should plan on it. What I'm 
talking about is modularity. 
You hear the word a lot when 
OS-9 hackers get together these 
days. It's basic survival. As 
we enter the new decade and our applica- 
tion programs get bigger and better, we're 
learning how easy it is to run out of memory 
with a 512K CoCo 3. Since the January 
issue of THE RAINBOW is traditionally the 
beginner's issue, this is an excellent time to 
review an important and timely concept. 

I've always encouraged you to break 
your programs down into smaller, more 
manageable tasks — to make your programs 
modular. When you do this, you avoid 
common problems such as running out of 
memory. 

There can be an analogy drawn between 
writing and programming. For example, 
novels are organized collections of well- 
written chapters, chapters are a collection 
of well-written paragraphs, and paragraphs 
are groups of carefully constructed sen- 
tences, etc. A writer begins by outlining 
ideas, then organizing sentences one word 
at a time. 

A programmer's first step is often to 
define a problem in terms of smaller prob- 
lems. These small problems can then be 
broken down into even smaller problems. 
Evenlual ly you reach a point where you can 
translate these small problems into state- 
ments the computer can understand. When 

Dale L. Puckell. a freelance writer and 
programmer, serves as director-at-large 
of the OS-9 Users Group and is a member 
of the Computer Press Association. His 
username on Delphi is DALEP: on packet- 
radio, KOHYD @ N4QQ; on GEnie, 
D.PUCKETT2; and on CIS. 71446.736. 



you've learned these techniques, you've 
learned structured programming. 

The payoff comes next. After you've 
used a structured approach fora while, you 
find thai many of the small problems are 
very similar and keep popping up again and 
again. If you write proper solutions to these 
small problems, you can use them over and 
over again in all sorts of programs. Each 
solution is written as a BASIC09 procedure. 
These saved procedures become modules, 
or building blocks, that you can use to solve 
larger problems. Eventually you own a 
library containing scores of modules. 

To use these modules, simply run them 
from within your new BASICQ9 programs. 
Parameters (another big word for begin- 
ners) make it practical foryou to break your 
programs into smaller pieces. With BA- 
SIC09 you're able to define parameters that 
describe the data you need to process and 
pass them back and forth between your 
BASlcoy programs or procedures. 

Without the ability to pass these para- 
meters, you would still need to write a 
unique procedure for each task. With para- 
meters a single procedure can solve many 
different problems. Let's use a specific 
example to explain this concept. 

The easy way to solve the problem of 
multiplying 2 x 2 is to write a simple 
procedure that does just that. It would be a 
very simple procedure, unable to do any- 
thing except multiply 2x2. The proper 
solution is to write a single procedure that 
can multiply any two numbers. You can 
pass it a new set of numbers each time you 
need an answer. Essentially the numbers 
you are passing are known as parameters, 
which can be any numbers, characters or 
strings that BASIC09 understands — even 
pieces of data you have defined using 



BASlC09's TYPE statement. Let's look at 
some actual code. 

The quick way to solve the problem of 
multiplying 2x2 can be accomplished in 
one line: 

PROCEDURE print 
PRINT 2*2 

A proper, but useless, BAStcxw proce- 
dure looks like this: 

PROCEDURE mult2by2 

DIM first2. second2 : INTEGER 

DIM answer:INTEGER 

first2:-2 

second2:-2 

answer:-f i rst2*second2 

PRINT answer 

END 

Both of the procedures above print 4 on 
your Color Computer screen. The only 
difference between the examples is that the 
second procedure is easier to read. It uses 
words that make sense in English and care- 
fully defines its variables — a habit you 
should get into. It saves memory and it 
makes your programs easier to understand. 

Here's the problem: What do you do 
when you need to multiply 3 x 4, or4 x 12? 
If you use the techniques above, you must 
write more procedures, which is not too 
productive. 

The answer is to write a generic multi- 
plication program that can handle any 
number. For example: 

PROCEDURE usefulmult 

PARAM flrstnum, secondnum: INTEGER 

DIM answer:INTEGER 

answer:=f i rstnum*secondnum 
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PRINT answer 
END 

To use the procedure useful mult, you 
must pack it and run il from the OS -9 
command line. You can also run it from 
within another BASIC09 program. If you're 
using Shell+, the command line looks like 
this: 

0S9: usefulmult(10.20) 

When you type these examples, RunB, 
BASlC09's runtime package, sets f i rstnum 
equal to 10andsecondnumequalto20. then 
does the multiplication. Shortly after you 



type the OS -9 command line. 200 appears 
on your screen. 

You don't always need to type a com- 
mand line to run one of your BASIC09 pro- 
cedures. Another procedure can also run 
them. The procedure below can print any 
part of the multiplication table. It accepts 
the beginning and end value of the table 
from you. then uses another procedure called 
from within a FOR/ NEXT loop to print the 
table. 

PROCEDURE runit 
PARAM first. second: INTEGER 
DIM Countl, Count2: INTEGER 
DIM answer:INTEGER 



FOR Countl :-f1rst TO second 
FOR Count2:-first TO second 
answer :-countl*count 2 
RUN prlntit(answer) 
NEXT count2 
PRINT 

NEXT countl 

END 

PROCEDURE printit 
PARAM answer: INTEGER 
PRINT USING "I8>": answer 
answer :-answer*2 
END . 



OS-9 Spotlight 



A profcsaioiYcil Miilii-Vite-biKcd paint 
program has finally arrived. MVCanvas. 
written by Mike Haaland, was a big hit at 
the Game Point Software booth during 
RAlNBOWfest Somerset. It is the first 
program featured in the OS-9 Spotlight. 

Visitors at RAINBOWfest stopped in 
their iracks when Haaland told them 
Ml?_Y//nm was running under OS-9. Ev- 
eryone had said it couldn't be done. 
MK'Canva.s is a VEF format graphics editor 
fashioned after CoCoMax. It has a Op- 
board function, lets you switch palettes, 
and supports multiple fonts and digitized 
pictures. You can work on a32Q-by-200- 
pixel. 1 6-eolor screen, or you can use a 
640-by-200 screen that delivers four col- 
ors. Print drivers are supplied for most; 
popular printers. AIF and icon files are 
yalso supplied, 

MVCanvas supports a wide variety of 
common and powerful commands as well 
as such features as Spray Can. Fill, Brush 
and Stamps. , , : 

MVCanvas is an excellent graphics 
editor, if Mike makes a few subtle changes 
to his user interface, it will be outstand- 
ing. My first suggestion concerns the 
location of several menu items. Generally 
similar functions should be grouped to- 
gether. Forexample, Clear appears under 
the File menus. It seems to me that when 
you clear the screen, you are editing. I 
would put this command under the Edit 
menu. Likewise, the Load Font option 
belongs under the Font; menu, not the 
Resolution menu. 



Another subtle change to the Edit menu 
would clear up Mike's metaphor and pres- 
ent a more universal man/machine inter- 
face. Cut, Copy and Paste, as implemented 
in MVCanvas, are somewhat confusing 
or at least nonstandard. Most visual inter- 
faces let you copy an object from a docu- 
ment into a clipboard and then paste it 
somewhere else in the document or in 
another document. When you copy an object, 
the original object remains. A cut is similar . 
to a copy except when you cut an object, 
you remove it from the original document. 
Paste is almost always used to place an 
object in a document, I would like to see 
Haaland adopt this universal metaphor iiv 
MVCanvas. 

Clipboards are generally temporary in 
nature, After you copy an object to a clip- 
board, it stays there until you copy or cut. 
something else. The new copy or cut re- 
places the entire clipboard. 1 also believe 
Mike could use the metaphor of a scrap- 
book forhisCut-to-Disk function. Thedisk 
files created by this function, like a scrap- 
book, are permanent files. *, " ? '; 

In many paint programs, the toolbox" 
takes up valuable space on the screen. Not 
so with MVCanvas, With Haaland's pro- 
gram you open the toolbox only when you 
need it by clicking on the word Tools in the 
menu bar. Yet a small change here could 
really enhance the operation of the toolbox. 

Haaland has implemented a (nodal tool- 
box. Simply stated, once you open the 
toolbox, you can't do anything else. You 
can work in the toolbox only until you close 



it by clicking on the OK button. A non- 
mpdal toolbox, which is almost impos- 1 
sible to deliver using the current Wind fnt 
manager, might be an impossible goal. 
However, a quick escape route just might 
make it bearable. 

Two methods could be used; You can 
use a hot key on the keyboard to close the 
toolbox as soon as you click on your se- 
lection — actually, it would also be nice 
to be able local! up the toolbox by striking 
a hot key. Better yet, why not be able to 
, exit the toolbox with the tool as soon as 
you click on the tool you need? A single 
click would work great for all drawing 
tools. However, you may need a double 
click to let OS-9 know that you want to go 
back to the drawing board and not stay in 
the toolbox to change the color or pattern, ; 
etc. Here's another nice trick that could be 
Used in the toolbox: As soon as you click > 
on a tool, the mouse pointer could turn 
into that tool, whether a brush, pen or 
spray can. „ ~ ' . '. % 

it is easy to open or save a file with 
MVCanvas. The program displays a list 
of files; You click on the one you want. . 
then push a Load button at the bottom of 
the screen. It would be nice to be able to 
just double-click on the file you want. 

Since Haaland uses a pipe to print your 
MVCanvas images, his prtdinp commands 
can also be used from the OS-9 command 
line. When printing VEF pictures from 
the command line, yon can teil OS-9 to 
perform this time-consuming task in the 
background while you continue to paint 
with MVCanvas in another window. 

Haaland is already talking about add- 
ing rotation and sizing and several other 
nice features. When Mike makes the meta- 
phorical changes we highlighted above,; 
MVCanvas will not only sing — - it will 
shout. CoCoMaxHl, look out! Q 
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Run the procedure runi t, using the BA- 
SIC09 command line: 

run runit(1.9) 

It looks a lot like the multiplication 
tables you learned in school, doesn't it? But 
if you want to run the multiplication tables 
between 20 and 30, you can do it by typing 
run mnit(20.30). You used the same 
format or syntax but different numbers. 
This example shows how parameters can 
make your life easier. 

The next thing you need to know about 
parameters is that they can be passed in 
both directions. To prove this to yourself, 
add the line: 

PRINT USING "15>";answer; 

to the procedure runit between the run 
printit statement and the NEXT count2 
statement. When you run runit the next 
lime, you'll see it prints two columns. The 
second column prints the value of the an- 
swer after it returns from printit. 

How is the answer doubled each time it 
comes back from printit? Take a closer 
look. It's right there in the code — 
answer :-answer*2. But you printed it within 



the procedure runit. This proves that the 
parameter answer was passed both ways — 
to and from the procedure printit. 

Before you start relying on parameters 
to do your dirty work, know that there are 
two types of parameters you can pass. A 
parameter can be an actual value, or it can 
be a name. If you type run runit(20.30), 
you are passing a value to runit. Con- 
versely, if a program running runit con- 
tains the line run runi t( first, second), it 
is passing by name. 

If you pass a parameter to another proce- 
dure by name, that procedure can return a 
new value to you. Essentially the called 
procedure associates the memory location 
of the parameter you passed with a name in 
a local PARAM statement. The procedure can 
change the value stored there and return 
that value to you. 

However, if you pass a parameterto that 
same procedure by value, it is not able to 
return a new value to you. In this case the 
parameter you pass is stored only tempo- 
rarily. When control is returned to the call- 
ing procedure, the system forgets it ever 
knew about the value you passed. There is 
a hidden benefit, however. If you want to 
ensure that a called procedure doesn't change 
the value of the calling procedure, just pass 



your parameters to it by value. You can 
even do this, when you are passing a vari- 
able, by multiplying the variable by a con- 
stant, as in: 

RUN print1t(answer*l) 

When you stall to use parameters heav- 
ily, you must concentrate on one additional 
piece of housekeeping. You must make 
sure that the parameters passed to a called 
procedure are exactly the same type as the 
parameters in the calling procedure. One- 
way to ensure this is to copy the DIM, PARAM 
and data type statements into both proce- 
dures with your editor. That way, you'll 
know they are all the same. 

After you study the procedures in this 
month's column and feel comfortable with 
the concept of parameters, look back through 
one of the issues when we were pursuing 
the KISSDraw series. You'll see that even 
though we were passing some complex 
data types, we were using the same tech- 
niques you learned this month. You can 
also pass parameters from BASIC09 to an 
assembly language orC language program. 
But that's a subject for another tutorial. 
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INTRODUCTORY OFFER !! 

" PHONICS FUN " 



A PRESCHOOL TO GRADE i EDUCATION 
PROGRAM THAT WILL PRESENT YOUR 
CHILD WITH HOURS OF LEARNING FUN. 

this pr-osran gives practice in associating Hie initial sounds of words 
uith the letters that nake thoss sounds, Each of the four categories 
■resents ten pictures, each depicting a different word, Ihere are over 40 
ligii resolution 16 color pictures with 4 words to choose Iron for each 
licture, Hie first letter of each word is highlited and choices are nade by 
yping letters in, 

Works on COCO 3 only. 



" Disk onlv * 

I /^ 

• RAINBOW 

y CERTIFICATION 

SEAL 

$17 IS, / $20 CM. 
plus $2,00 S/H 




Sorry no COD's 
ml CHEQUE or HO 



[V 



(0 



<> W.B.D. SOFTWARE 

I P.O. BOX 1077 

7T ESTERHAZY, SASK. 

1 CANADA SOA OXO 



SASK, RESIDENTS ADD U IAX 



PH. 



5-652? ii 

■r.T.T.T.r.r.r.'.r.'r.f. 



TAZMAN 




RAINBOW 

CERTIFICATION 
SEAL 



Soar through the universe with an old ship and a 

small cargo, searching for Inhabited planets on 

which to market your goods. Shop for the latest 

and most efficient upgrades for your ship. Stay 

clear of space hazards and sidestep planetary 

storms as you seek your fortune among the stars! 

512KCoCo3, OS-9/II & One Drive 16 Colors Joystick $24.95 



sSs, Armchair ^Admiral 



The time-honored game of Battleship, enhanced by 

intelligent computer opponents, comes to your 

CoCo3 complete with sloops and galleons. Up to 8 

players, any mix of human or computer. 

128KCoCo3, Tape or Disk $14.95 



Riddle of the Ring 

Text adventure 

Games Pack 1 

Concentration. 

Hangman & others 



CoCo2/CoCo3 

1 Drive 

$10.00 each 



SPECIAL OFFER 



Buy Tacman A Ai 
and get a fr 



(Taooan/Araclia 
Additional ahir 



hair Adair 
T-Bhirtl 



r) <S M L XL) 
I 510.00 each 



Checks, money orders. MasterCard & Visa. 
All orders add $2.00 shipping and handling. 

C.O.D. please add an additional $2.00. 
Washington addresses add 7.5% Sales Tax. 



Eversoft Games Ltd 

P.O. Box 3354 
Arlington, Wa 98223 



(206) 653-5263 
10am to 6pm PST 
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ADVANCED STAR'TRENCH (THE RAINBOW. 7/86) 
4.750 Stephanie Martel, Laval. Quebec 
4.500 Frankie'DiGlrjyannl, Olhey. MD 
: 4.475 Davo Schaller. Ciarkston. WA 
I ANORONE {Radio Shack) 

28,635 Way"" Roberts. Stillwater, OK 
20,820 Gary Budzak, Westerviile. OH 
I ASTRO BLAST (Mark Data) 

49,356 BnanS.Br.mc. ! aket tie, Ca 
48,825 Tony Bacon M: Var-on. IN 
24,980 Matthew Smith. Courtanay, British 

Columbia 

ATOM /Radio Shackl 

Round 2 Coba'' u?-s Janes Donegan, Saurgeitiea 
NY 
BASH (SRB Sorrware; 
I 1.342,800 David Ring, Lyman, NE 
I 744,900 Ancy Carter, North Charleston, SC 
I BEAM RIDER ID & DSoltware/ 

2,17). 280 Rose Snyder, Cincinnati, OH 
1,946,940 James Snyder. C'r-cinnati.OH 
1.232,430 Beverly Rihm. Appleton. Wl 
BEE ZAPPER (THE RAINBOW. 9.87) 

28,275 William Currie, Br, ant Road. MD 
1 5.785 Davio Hartmann. Osoyoos, Bntisn 

Columbia 
12,825 Frederick tajoie, Middletan, Nova Scotia. 
BIOSPHERE (/too Shack) 

64,000 Ty StocKsaale. Racine, Wl 
BLITZ (THE RAINBOW, 6.'8B) 

126,400 ■ . Jerry Anderson. Jacksonville, FL 
69,150 Ryun Schtecht, Gackle. ND 
66,975 Joel Kiein, Indianapolis, IN 
63.150 Kreig Bryson. Woodstock. GA 
BOUNCING BOULDERS (Dieccm Products; 
24,186 Dennis Zobet, Cente'each, NY 
16,874 , Michael Zpbel, Cm,", oar- NY 
3 0,930 Patrick Garneau, Ste-Croix, Quebec 
[ BREWMASTER (NOVASOFT/ 

133,025 Andy DeGroat, Saginaw, Ml 
52,500 Chris Delertain, Peeksklll, NY 
52.175 Held." Santos, Montreal Queoec 
51,925 Wendy Staub Moundsvflto WV 
BUZZARD BAIT,, >•"..'„,, 

230,100 Jason Bauer, Menominee, Ml 
"9,000 Scott Waterlander. Benton Harbor, Ml 
CASHMAN (MiChTron) 

u.,910 Hetder Santos. Montreal, Quebec 
S.870 !.':•"■ I '. Ma Arcadia. CA 
CAVEWALKER irt.iOioSh.ii*) 

209.870 Todd Von Nana, Isle ol Palms, SC 
183,290 Robert Young, Mitdway. Ontario 
41.060 Russe'tWa-er-Bevere. Tucson. AZ .,. 

30309 &,.t -. England Kimble Gtendae. AZ 
I CLOWNS S BALLOONS (Radio Shack} 
688.960 Faye Keeter, Augusta.GA 
217,500 Frankie DiGiovanni, Olney. MO 
,-• 70,180 Charles Andrews Delta Jc;,AK 
| COLOR BASEBALL (Radio Stack) 

596-0 Franck C: D'Amato, Brooklyn, NY 
S95-0 Tom Cherubino, Brooklyn, NY 
412-0 Br,an S. Branie, Lakeside. CA 
389-0 Wes Latimer. Grangeville. ID 
387-0 Joel Stocksdaiu, Raci"e. Wl 
276-0 Kevin Wa^en-acher, Payne. OH 
- 238-0 - John Valbni-ne. Maiborough, CT 

149-0 J '»r, :'-'-c •>. ft - igton, OH 
147-2 Jonn Weaver, Amsterdam, NY 
: '137-0 Scott Galvao. Tiverton, Rl 
137-0: Jonnitor Johnson. Mc-dnn, CT 
132-0 Karen Rlm.iier. Adams. NY 
130-0 Matthew Sn-oor, Pinehursl, TX 
130-2 Greg Allen. Aw/ater, CA 
126-0 Jaso" Trammel. Murphysboro, iL 
113-0 Chris Donato. Euotrd, OH 
■ COLORCARuVOV^SCFT) 



343.075 Duncan Cameron. Chippewa Falls, Wl 
31 6,550 Alan Martin, Cornwall. Ontario 
THE CONTROLLERS (THE RAINBOW, 2/B8) 
365 Roger Ranee. Charleston, SC 
30S Erin Carlton. Charleston, SC 
CRYSTAL CASTLES (Thunder Vision) 

516.220 Jason Trammai, Murpnvsboro, it. 
DALLAS QUEST (Radio Shack) 

81 ■ Brad Wilson. Litnia Springs, GA 
■' 85 Paul Summers. Grange Park. FL 

85 David and Shirley Johnson. Leicester, 

86 Roy Grant, Tobdb, OH 
.-86 Melanie Moor, Florence, AL 

66 Curtis Trammel. Murphysboro, IL 
OEF MOV (THE RAINBOW, 1/87) 

50.566 Frankie DtGiOvanni. Oinay, MD • 
43,806 . Domingo Manjnei. M ami PL 
39,320 Matint-w vr :i\fi'.rt.r,iv.n ubCoh. 
DEMOLITION DERBY fflSeftl Shack) 

1 1 3,200 Gary Budzak. Westennlle. OH 
.110,500 Jason Downs, Albany, OR 

100,500 Richard WmkBlbauer. Broni, MY 
DEMON ATTACK (Imagtc) 

279.435 Jon Hobson, Plainfeid. Wl 
202,260 Tom Bnggs, Hillsdale. NY 
89,285 Udioii Thomas, Arnold. MD 
DESERT PATROL (Arcado Animation) 
1.099,899 ChnslJcero, Denver CO. 
505,250 Rickv 1 „wi. Ma- ow, OK 
234,300 Steven Turcolle. Matahe. Quebec 
DESERT RIDER (Ran S lucM 

So.yo:! T ,,i,i : P., /!:,- AnJnrron.se 
68!353 Mfa AS Ss Jua> ■ Capis'iar.o. CA 
653f>* : ,-_,:- ,« , ,: "-,.,.-, Cunton, CT 
DEVIL ASSAULT torn Mix) 
1,866.100 Steoune Mario), Laval, Quebec 
623,550-' Dale Krueger. Maole Ridge. British Colu 
DOWNHILL (THE RAINBOW, 1/89) 

*.Q James Donegan, Saugerties; NY 
10 Amy Schiller, Denmark, Wl 
'■0 Ryun Schlocht, GacKlo, ND 
10 Russell Warren Severs, Tucson. AZ " 
10 MaikBnssio. Nashville, TN 
DOWNLAND (Radio Shack) 
: 125.450 Pat Noma. O Fallon, MO 
99.982 Eric Manor N awai . DE 
99.380 Danny Wimutt. Rome. NY 
DRACONIAN (Tom M«j .... 

137,810 Chris Lucero. Denvef; CO 
127.870 Michael Mufon Buffalo. NY 
DRAGON FIRE .Radio Shack} 
1 60.635 • m. 01 - - • Wi - a-on, II 
146.325 Steonane Martei, Laval, Ouebec 
ENCHANTER (Iniocom) 

400/361 David P. McCoy, Franklin NC 
FIRESTORM (THE RAINBOW, 1/86) 

22,505 Chad Presley; Luseianiil. Saskatchewat 
1 1 .250 Stephano Maael. Laval. Quebec 
5,680 Kathy Rumpel, Arcadia, V/l 
5.130 Mark B."ssie. Nashville, TN 
GALACTIC ATTACK (Radio Shack) 
31 .100 Uplon Thomas. Arnold, MD 
23,030 David &'..< ,." -.1. Noil amplon. MA 
26.370 Jell Re-mck, Warren. Wl 
GALAGON (Spedra/Assdc/ales; 

751.020 Sols Giorgi, Brasilia, Brazil 
357,890 Jason Clou-gh, Houston, TX 
328.820 Bernard SurkP, Lee's Summit. MO 
GANTELET (Diecom Products) 
55.398.298 Phil Wooding. Renovo, PA 
45.235.820 Ken Hubbard. Madison. Wl 
23.643.720 Goran Stalker, Rivordaio. GA 
GANTELET II 'f ipton? Products > 



m 



ibia 



1,046-0 Mark E, Wentrobie^ Tyler, TX 
825-0 Ryan Giady, Newixny Park, G A 
522-14 Josh Encarnalion, Omaha NE - 
: 83-3 Charles Reve ce O'-e'. Laure-n. Que»ec 
GHANA BWANA /Radio Si ,\.; ' 

">0.'5",'g Jw,««- :>• i- .-v. A -;i -o GA 

282,070. Kolly Jont-3, WasI Mwn, OH 
i74,4*,o Oaraanr(JflaB9eri,Du(ur,OR 
GIN CHAMPION iWicto S.-uck; 

2,224-0 Lea Daoell, S.' ■<-. Rn .. IA 
:,602-0 J..no.y oa-er R Worth, Tt 
1,120-0 K:m Jonr-.s, Port Cog., British Columbia 
GRANDPRIX CHALLENGE iGiscom Products) 

67,710: H; DingwaE Litchiield. GT 
GROBOT (Children's Computer Workshop) 
9.665 Wendy Staub, Moundsvi-.io.WV 
8,090 Sort Lebei, Louisville. KY 
HELICOPTER HERO (THE RAINBOW, 3/88) 
4,608 Jerry Anderson, Jacksonville. FL 
103 Phi! Holsten, Moraga, CA . 
76 Chris Nuwo-. Lockpon. NY ; ' 

HITCHHIKER'S GUIDE TO THE GALAXY'fWocom) 
400,-359 Roy Gram "rolndo. OH 
400/422 Jel' Holtham W3ierloo, Omario 
400;5iO S.-aoWilsci Litma Springs GA 
IRON FOREST ,.'.r-- '/;ffi :;, 
5.671.500 n-n Tin;'; ■••■ ;» .'.jtd.iD 
4,088.000 Gabfislftley. RlcMeld. ID 

iwihXXI Janet Boyd, A- -mi I., ;/ 
1.376.850 R] ..I-.., 1 mi ,. ■ Manow, OK 
JOKER POKER (THE RAINBOW, 3/87) . "' -.», > " " 
62.067,906 Carols RjacKert, Manstie-a. OH 
47.505,322 Blaih Jamieson, K-igsion. Ontario 
21.733,284 Jon Fogariy Yale, Ml 
JUNIOR'S REVENGE (Compiiterware) 
2,503,000 Steo'na^e Martei. Laval/Quebec 
257,600 Keith Cohen. Rocky Mount, NC 
JUNKFOOD(THE RAINBOW, 11/84) 
.535,760: Charlie Ginn. Augusta GA 
'356.850 Jon Hooson. P .i"'iein. Wl 
■ s„ 18,990 JoelKlein, Indianapolis IN , 
KING PEDE (T&D SolMiate' 

145,035 Trtsha Eckrc'! Noth Platte. NE 
: 83,855 Mike Snyder. A : ■- , OK 
KING'S QUEST III (Sierra On-bne) 
.210/210 David Ring, Lyman, NE 
KNOCK OUT (Uacom Products) 

472,995 Frank D'Amato, Brooklyn, NY 
1 83,675 Rush Caley. Port Orchard, WA 
105,585 Bob Br'insl-eld. Jr., Norwood. PA 
KORONIS RIFT (Spy*) 

188.250 Mario Zuvieta, McAllen, TX 
186.710 Tony Harbin, Cullman; AC 
KUNG-FU DUDE oViCog Svnems) 

32,000 Tdny Geitg-".'. w' v.-i.; •■, Park, PA 
16,130 Rod Miller, Saraso'n, FL 
14,305 David Scholze San Anto-o. TX 
12,150 Cotly Onega- Fallon. fJV 
10.145 Randy Milter, Sarasota. FL 
THE LAIR rT.'fleiWoter Sort.v ,•■:> 

.1 1 2,940 James Walton, Pittsburg. PA 
LANDER IT 8-0 Software} ,'/, 

780 Afi EnKin, Neppan, Ontario 
LASER SURGEON; THE MICROSCOPIC MISSION 



44 1 ,490 Asher Martin, Wooonug. 

55,01 5 Andy Freeman. TurOe u 

GFL CHAMPIONSHIP FOOTBALL II 



.42,767 Joe St.-v ey.HB 






LUNAR-ROVER PATROL i 


]pdctra! Associates}/ 
3ladwm, Ml 




45,700 Kame'O" Pencr 


. N J.j;'S0n, OH ■ 
1 LStleftock. AR 




LUNCHTIME Item Mfr, 






H6.825: Jason Bauer. M 


-: q ,- nsa Ml 




MARBLE MAZE iCrfcwn Pn 






353,220 David Boiand, C 


/ubudue IA 




30,650 Ainbe- Reynoo 


s. White Crty. Saskat 


sliewan 
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A MAZING WORLD OF MALCOLM MORTAR 
(Radio Shack) 
8,125 Sharon Blower, New Cumbe'rand, WV 
: 7,830 Robert Meffard. Rockrord, OH , 
7,545 Joshua Wanagei, Freeviiie; NY 
7,155 Kreig Bryson, Woodstock, GA : 
7,035 Thomas S Co'ttH W. Yaupon Beach. NC 
6,530 Robert Young, Mtidnay, Ontario 
MEGA-BUG .(Radio Sham 
■ 12,000 Matthew Sm'th, Courts -ay, B-tis- Columbia 
10,044 Douglas Bacon, Middletow", CT 
9,309 Alan Kramer, Cooksvllle, MD 
3,263 Amy Schiller. Denmark. Wl 
2,292 Davie Weave', Amsterdam, NY 
MEMOCARDS (THE RAINBOW, 8»87) 

3,120 Use Gagne. o' David. Quebec 
t.964 Scott Walotwew-cj. Twonv9~> Wl 
1,640 Sara Miiteistaedl, Ke:, Wl 
METEOR STORM 3 (THE RAINBOW, 10(89) 

5,025 Ma*;8fissie, Nashville, TN 
MINE RESCUE (SRB Software) 

670,200 Chuck Lehotsky. N, Jackson, OH 
MISSION: F-16 ASSUALT /Brecon! Products) 
.565,395 Tony Bacon, ML Vernon, IN 
468,750 Karen Jesseri, Cleveland, OH 
355,570 Stirling; Dell, Dundalk. Ontario 
MISSION: RUSH'N ASSOALT (Oiacom Products} ■ 
1,210.550 Robert Meiferd, Hock'ord, OH 
787,300 Tony Bacon. Mt. Vernon. IN 
361,750 Clay Jones, Wooster, OH 
212.500 Kelly Jones. West Salem, OH : 
MONSTER MAZE (Radio Shack) 

255,000 Joel W. Carrnichael: Pine Bush. NY ... 
52,510 ChrisKremo; Bethel.CT 
12.950 Paul OeVita, Vaiiejo. CA 
ONE-ON-ONE (Radio Shack) 

1,310-0 Jon Breckel.. Wilmington, .OH < 
1,302-0 Thomas Payton, Anderson, SC 
1,280-0 Randy Sunderland. Page, WV 
.1,276-0 ■ Jonathan Dorris. Indianapolis, IN 
1,260-0 Brandon Heeca, Chickamauga, GA 
OUTHOUSE (MichTron) 

534,080 Kay Fo»e.Kansa3 City, MO 
59,641 Sam Zees*. Coal Center, PA 
38,640 Dave Slajb. Mo„-asville. WV 
PAPER ROUTE (Oecom Products) 

248,400 Cathy E. Kimble, Glendale. AZ 
150,580 Heather HamBien. Bar Harbor, ME 
PITFALL II (Activism): 

: 1,568,500 Sandy Baker, Martin City, Montana 
1.519,500 Jim Mammons. Martin. City, Montana : 
1,085,500 TraGOyCee Slack, At^ood, Ontario ; 
871,500 Aaron Florence, English. IN 
586,500 Jonathan Tdtoski, Totringlon, CT 
! POOYM(Daia$oH) 

1,453,950 Lois Crowson, East Aitbn, IL 
1,286,050 Craig Schneider, North Plane, nb 
626.700 Charles Rene de CoKet, Saint-Laurent. 
Quebec ■ 

POPCORN (Radio Shack) . 

150,560 Tom Charubino, Brooklyn, NY 
105,560 Heather Condit. Grafton, NO 
26,889 Claude Jalbert, Maiane. Quebec 
25,450 Dianne Mozietti. Pittsburgh, PA 
PROSPECTOR (THE RAINBOW, 12/88) 
: 56.150 Sara Milleistaedt, Kiel. Wl 
51,850 joe.K.e- .ndiahapolis. IN 
27,850 Ryun Scniechl. Gackle, NO 
•6,150 Cray Augsburg 
5,000 Chris Newer, LockpOrt, NY 
4.100 Angle Mrtteisraedt. Kiel. Wl 
, 4,050 Jutta Kapfhammer 
PYRAMID 2000 (Radio Shack) 

220 : Matt Chlapovrski. Webster, MA 
220 Darren King. Yorkton. Saskatchewan 
220 Mike Snyder, Allen. OK 
PYRAMIX (Color Venture) 

72.060 Teresa Grant.' Groton. CT 
68,550 Andy Freeman, Turtle Lake. Wl 
67,850 Richard Winkeloauer. Bronx, NY 
37,950 " Btein Jamiasoh, Kingston, Ontario 
QUIX (Tom Mix) 
8,407,778 John Haldane. Tempe, A2 
RAD WARRIOR (Epyx) 

21,484 Robert Melterd, Rockford. OH 
10,064 Kreig Darnel Bryson, Woodstock, GA 
8.736 Jonathan Fullarton. Gardiner, ME 
6,018 Oiedrlck Brown. Pine Mouhlain, GA 
4,368 Sean Russell, Saint John, New Brunswick 
4,224 JOShEncamation.Omana.NE 
4,112 Randy StocKsdale. Racine. Wi . 
3,936 MatthewSrnith.Courtanay, British Columbia 
RADIO BALL (Radio Shack) 
1.780,870 Jocefyn Gagne. St-David, Quebec 



■ 1 .76 1 ,030 Errc Mellon. Newark, DE 
1,666.670 Use Sagno Si-David, Quebec 
1.557,100 David Heasn, Hadiey, PA 
REACTOID (Radio Stock; 

8,055 Gary Budzak, Wesfervuie. OH 
RED WARRIOR (Radio Shack) 

5,488 Scott Godfrey, Nashua, NH 
4,164 Roger Ranee, Charleston, SC 
4,011 Eri'i Cantor, Charleston, SC 
RESCUE ON FRACTALUS (Epyx) 
1 ,000,948 Steven Ujvary, Calgary. Alberta 
323,167 Kenneth Hill. Savema Park, MD 
RETURN OF JUNIOR'S REVENGE (Cotarwme) 
2,053.100 Teresa Grant, Grow, CT 
1 ,792.800 Chad Presley. Lus eland, Saskatchewan 

ROGUEi'epxx) „"-'■:.,; :. ".; , 

1,000,143 David Ring, Lyman, NE 
71 .833 Jon Fogarty, Yale.: Ml 
65.529 Joseph H. Campbell. Norfolk. VA 
"-5,400 Denny Turner, Vlrqmia Beach, VA ' ; 
SAILOR MAN (Torn Mix) 

487,700 Mamie Schalm, Edson, Alberta 
332,200 Jason Downs, Albany. OH 
247,900' Jason Bauer. Menominee. Ml 
243,300 Scott Watarlander, Benton Harbor. Ml 
231,900 Jessica WllWns, Seymour. TN 
SANDS OF EGYPT (Radio Shack) 

67 Tristan Terkiic, Richmond. Ontario 
82: Edward Rocha, Cobleskill. NY 
SAUCER DEFENSE (THE RAINBOW, 4/87) 
95,000 Kevin Hilton, Conway, AZ 
40,000 DavtrJ'Hartmann. Osoyoos, British Columbia 
SCRATCH GOLFER (THE RAINBOW, 3(89) 
63 Leil Smedberg. Chiitubusco, IN 
62 Frank Sedlarcik. Oarmsl, NY 
61 Jay Wood. Alexandria. MN 
SHAMUS (Radio Shack) 

6VJ745 Scott Galvao. Tiverton, Rl 
50.840 Chris Ktemo, Bethel, CT 
20,870 Larry Fuhrmanhi J?., tynnv/ood, WA 
SHOOTING GALLERY (Radio Shack) 
36,630 Patricia Slrakey, Littleton, CO 
27,270 joceiyri Hoiiynr, Montgomery, IL 
25,870 Holder Santos, Montreal, Quebec 
25,510 Donald Knudson, Minot, ND 
SHOOT'N RANGE (THE RAINBOW, 8(87) 
55.623 Paul Rabbins, Picayune, MS 
14,702 RIcnaiO'WinkalbauHr. Bronx, NY 
13,794 Phillip Holsten, Modesto. CA 
SHOPPING SPREE (THE RAINBOW, 7(89) 
52 Jason Bauer, Menominee, Ml 
SILPHEED RM Arts) 

107,577 Josh Encarnatioh. Omaha, NE 
. 93,351 Shan McKinney. Morton. Al. 
80,603 Frankie DtGiovannl, Olnfly, MD 
SLAY THE NERIUS (Radio Shack) 
73,09.1 Jell RemiCk, Warran, Ml 
65,921 Chris Lucero, Denver, CO 
63:476 ChrisKremo. Bethel, CT 
21 ,410 Scott Sevenson, Jamestown, NY 
SNEAKY SNAKE (THE RAINBOW, 8(87) 
.137 Guy Greene, Bradenton, FL 
102 Mike Alt, San Juan Capisuano. CA 
91 Chris Nuwer. Lockpari. NY 
SPACE ASSAULT (flaflro Shack) 

49,070 John Stokes, Osoyoos, British Columbia 
13,110 Jeff Remick, Warren. Ml 
7,280 Jason Kopp, Downs, II. 
6.750 John Weaver, Amsterdam. NY 
6,120 Dav*l Weaver. Amsterdam, NY 
SPACE INVADERS (Spectral Associates) 

3,920 An Enkin. Weapon, Ontario 
SPEED RACER (MichTron) 

103,120 Ricky Turkett, Marlon. OK 
97,400 Jeff Morrison. Mario*. OK 
96,420 Karsn Rimaier. Adams, NY 
96,000 Amber Reyrnonds, Whito City. Saskatchewan : 
SPEEDSTER (THE RAINBOW, 8(87) 
250,500 Kevin Hilton, Conway, A2 
211,300 Paui Robbtns. Picayune, MS 
117,080 Bill Mi'wgion. Merlden. CT 
SPIDERCIDE (Radio Shack) 

27,730 Mike LeBrun, Cornwall. Ontario 
SPRINGSTER (Radio Shack) ' 

379,210 Wayne Roberls, SSllwater, OK 
303,520 MavisHartman.n,Osoyoos,BritlshColumbia 
200,670 Denise Root. Thorndale, PA 
41,230 Jason Trammel, MurphysborciL 
STAR BLAZE (Radio Shack) 

9,150 Amy Scliillor, Denmark, Wl 
8,950 Richard Durksen, Grunthal, Manitoba : 
6,550 Flint Weller, SM/arthmore. PA 
STOCK 3 (THE RAINBOW, 1 1 '88) 
77,386,525 Guy Greene, Braaenton. FL 



STRATA (THE RAINBOW, 5(88) 

; 4.380 Biain Jamieson, Kingston, Ontario 
4.040 Ryun Schjecht. Gackte, NO 
3110 Kalhy Rumpel. Arcadia. Wl 
2.992 Alan UndBbarry i ttontdale. PA 
SUPER PITFALL (Radio Snack) 
.2,024,500 Danny Lea Fy., Independence: MO - 
1,995,000 Joel W Carmichaal, Pine Bush, NY 
1,930,000 Phyllis Cross, Indianapolis, IN 
'; 1.752.500; Bruce Hoffsommer. Ridley Park, PA 
1.723,000 Robert Young, Mildmay, Onfari 
1.708,000 Jor n upr/raiv. R'sing Sta', TX 
1,700,000 Tom Jonei M.-an it 
TEMPLE OF ROM («jr'„; Slack) ,; ' 
604,000 Troy Granarr. Arnold. MD 
507,700 Adam BraugMon. Morns. PA 
5303.600 Tim Hennon. Higita-u. IN 
TETRIS (Radio. Shack) 

9,1 10 John Freldrich, Natrona Heights. PA 
>: ...7,551 Joel W Carmicael. Pine Bush. NY 
7.4S2 J ison Dawns, Albany, OR 
70y? Ccris Kremo, Bethel, GT ' : 
6:224 Lor! Harvey, Ut Porta City, IA 
6122 Megga ''aokbartfi. Oayton, NY 
5.955 John Krerley. Rocnes:-.". NY 
5,662 Jimmy Garner, Fori Worth, TX 
4,258 Chuck Lehotsky, N. JackSon, OH 
THEXDER (Sierra On-line) 
3.001,300 Joseph Cheek, West Jordan, UT 
:> -: !3.ooo Fmnkie DiG"o. s.-, ■ ( Jmey, MD 
2,011200 Travis King, Montrose, WV 
1 ,823,900 Torn Gauwfut. Roanoke. II. 
1,411.700 Stove Hallin, Biloxi. MS 
TIME BANDIT (MichTron) 

76,030 Brent Morgan, Centerville, OH 
59,020 SteDhanie Morgan, Cemerv-e. OH 
TOADER (THE RAINBOW, 2(89) 

7.04 ' Joss.ca Wilkins, Seymour, TN::i 
5,11' ,io'xHot:»on, Plainfield, Wl 
TREKBOER (Man* Data) 

123 Roy Gram. Toledo, OH 
132 Matthew Fumich. Munlord, TN 
TRIG ATTACK {Sugar Software) 

196,000 Gassaursdra Stewart, Sacramento, CA 
TUTS TOMB (THE RAINBOW, 7(88) 
5-1.344 Brian Brame. Lakeside CA 
53,280 William Cutne, Bryans Road, MD 
24,190 Keith H. Pandley. Monlgomary, AL 
VARLOC(«arooSf.i k: 

2.502 FrarS% D A -ia:o,.8rookt/n, NY 
• '2,032 Tony Hsroin, Cullman, AL 
2,032 EdwatoRocha, CooieskJi. NY 
VICIOUS VIC (THE RAINBOW, 7/86) 
18,813 Talib Khan, Bron«, NY 
15,063 John Comey, Everett, WA 
WARRIOR KING (Sundog Systems) ' 
46.100 Asher Martin. Wbod'iage. IL 
31.800 Jasou Coiling. Jackson, MS 
.30,500 M«6 Sooink, Read.r^ ('A 
18,700 . Jason Bauer. Menominee. Ml 
WILDWESTCromMrx/ 

52 r-arra' Kemmer. Phoerjx, AZ. 
35 Paul Sjmmers Orange Park. FL 
WISHBRINGER (Intocom) 

400(20! Brad Wteon.i una Springs, GA 
WIZARD'S DEN . TomAfty - 

593,950 Ricnatd Wirwelbauer, Bronx, NY 
467,000 David Reasb, Hadiey. PA 
425,350 Leif Smedberg, Columbia City, IN 
195.050 fvterk Toucheite. Preston, CT 
WRESTLE MANIAC (Oiecom) 

956,971 Marc Reiter, Cincinnati, OH 
546315 Louis Bouchard. Gatineau, Quebec 
XENION (Oiecom) 

429.530 Chris Oeierlein. Peakskill. NY 
'." ,159,190 Charies Rene de Catret, Saint-Laurent, 

Quel)';: 
ZAKSUND (Elite Sofr.va'ei 

557.900 Tom CIWuD^o. Brookyn. NY 
357,550 Marun Parana. Arcadia CA. 
268:350 Tony Bacon, Ml Vernon, IN 
ZAXXON (Datasolt) : , 

2;O61.000 Byron AiforrJ, Raytown, MO 
1 ,950,000 Blake Cadmus. Reading, PAZONERUMNER 
(Radio Shack) 

65535 Scott Godfrey. Nashua. NH 
65.535 Mike Woycheshen. Coquiliam, British 
Columbia : 
ZORKj7ntoco;nJ 

350(328 Konnie Grant, Toledo. OH 
■ 350(567 Matthew Yarrows. Easthampton, MA 
ZORK II ((nfocom.l 

400/503 David P. McCoy. Frankim. MC 



Give us your best: Join the ranks of these courageous CoCoists in showing the Color Computer world your high score at your favorite micro- 
diversion. We want to put your best effort on record in THE RAINBOW'S bimonthly "Scoreboard" column. All entries must be received 60 days prior 
to publication. Entries should be printed — legibly — and must include your full name, address, game title, company name and, of course, your high 
score. Each individual is limited to three score entries per month. Send your entries to Scoreboard, c/o THE RAINBOW. 

For greater convenience, your high scores may also be sent to us through the MAIL section of our Delphi CoCo SIG. From the C0C0 SIG>prompt, 
pick MAIL, then type SEND and address to: EDITORS. 
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SCOREBOARD POINTERS 
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In conjuction with THE RAINBOW'S Scoreboard, we offer this bi-monthly column of 
pointers for game-playing readers' benefit. If you have some interesting hints, tips 
or responses to questions, or want help yourself, we encourage you to write to the 
Scoreboard, c/o THE RAINBOW. 



In response to questions from: 

• Andy Schmidt: In the Interbank Inci- 
dent, give money to the wuiieral the bar 
in Germany. Then give the wine he 
gave you to Angel, the ticket lady , at the 
station in Seattle. Talk to her and she 
will usually give you a clue. Also, give 
the invitation to the bartender in the 
train and talk to him. 

In Enchanter, how can 1 get the Ozmpo 
Spell? 

Joan Malenfatit 
Lewiston, Maine 

• Thelma J. Saffold: In Night of the- 
Living Dead, kill the caretaker with the ; 
shovel and search him for the keys. > 
Unlock the gate with the key, enter the ; 
cemetery, then lock the gate quickly to 
avoid the choirboy. 

Tony Olive 
RAINBOW ■Magazine 

• Chuck Carpinello: To get the wizard 
in Dungeons of Daggorath, go down 
into the holes of the dungeon. Mow do 
you summon the book? , 

Ryan Middleton 
Winter Springs, Florida 

Scoreboard: 

I'm looking for any hints onPyramid 

2000. How do you get through the maze? 

Tanya Pclley 

Rothesay, New Brunswick 

Scoreboard : 

In Dallas Quest, wheal am ready to 
go to the airport and fly to South Amer- 
ica. 1 discover I must always leave some- ■ 
thing behind since the game tells me 1 
can't carry any more items. Is there a ' 
way I can carry all these items? 

in Interbank Incident, how do you 
enter the apartments, the room in the ; 
Eire! Tower, and the other locked rooms? 
Also, where do you find the computer 



cartridge? What do you put in the slot 
on the yacht when you are in Rio? 

Jeremy Gross:, 
Bridgewater, New Jersey 

Scoreboard: 

In Castle ofThiifoggad. I can gel; to 
thebltie level, but I've tried everywhere: 
and I still can't get out. The passwords, 
in order, are: F1Q2051KI, C81?1?;?VU, 
2VVV00QBA, and 0O04E2QOG. Tin's places 
you above the door to the level below, 
right at the start of the blue level. Can 
anyone give me the password that will 
lei me under the door on the blue level 
that lepras up to the next one? 

Normand Gibson 
Avimer, Quebec 

Scoreboard: 

In Cahuhiril-Flame oj "Light, how do 
you tie the rope to the bucket? What is 
the proper sentence? Also, how do you 
unlock the chest? 

in Caladuril 2- Weatherstones End, 
how do you connect the nail, string, 
sticky tape and balloon? I know what 
these objects are supposed to do, but I 
can't tie them together. 

In the Power Stones of.Ard. how do 
you get past the green door',' Also, how 
do you use the gems'? 

Tony Durst 
Brantford, Ontario .; 

Scoreboard: 

In Zax.xon, to avoid the space, conflict 
where you often are killed, pause the 
game for about one minute. When you 
unpause it, the ships will whiz by, making 
you stay alive a little longer. This works 
On all space sequences. 

Now that I have given you this clue, 
someone help me. In Castle of Tharog- 
gad, how do you get to the third level? 
I can't find the ladder to the next level. 
What do you do with the magic match? 
These seem to be the only things bar- 



ring my way to get further in the game. 
Please help, someone! 

In the Seventh. Link, go east of the ■ 
bakery in the beginning city. Open the 
door and climb down every ladder. In 
one dungeon under the city you will 
find Hogramil. a thief. Also, far to the 
southeast in the city you will find Tharon, 
the cierec. Use the non-key command 
Jo i n plus a direction to get them to join. 
Andrew Yarrows '■ 
East Hampton. Massachusetts 

Scoreboard: 

A hint for the role-playing adventure, : 
Pool of Radiance; Use the magic spell 
"Detect Magic" whenever you discover 
weapons or items given to you or con- 
quered. A star beside an item indicates 
that it is magical and is worth taking to 
he identified. This will allow you to 
pick and choose only the best equip- 
inenl for your characters. 

Don't try to destroy every section of ■ 
Phlan without searching the wilderness 
outside of the city. Much experience. 
I and knowledge caivbe gained there to 
help you inside of Phlan. 

John Hoffman ■■ 
Stcelton, Pennsylvania 



To respond to olher readers' inquir- 
ies and requestsfor assistance, reply 
to "Scoreboard Pointers" c/o THE 
RAINBOW, P.O. Box 385, Prospect, 
KY 40059. We will share your reply 
with all "Scoreboard" readers in an 
upcoming issue. For greater con ven- 
ience, "Scoreboard Pointers'" and 
requests for assistance may also be 
sent to us through the Mail section of 
our Delphi Coco SIG. From the CoCo 
SIG> prompt, pick Mail, then type 
SEND and address to: editors. Be 
sure to include your complete name 
and address. 
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to take advantage of from 64K up 
to a full 512K. Requires low cost 
amplifier (RS cat. #277-1008) and 
any microphone. Will run on a 
CoCo 1, 2, or 3. Vocal Freedom 
Disk: $34.95. Optional Hacker's 
Pac Disk: $19.95. Disk for both: 
$49.95 



// w\mL d'wAwmj 



Reads your master disk once and 
then makes super fast multiple 
disk backups on all your drives! 
No need to format blank disks 
first! Supports 35, 40 or 80 track 
drives. This utility requires 
512K. Disk: $19.95 



ZSQ\ 



(Pi 



This is a fascinating CoCo 3 game 
of skill and coordination. Pyr- 
amix is 100% machine language 
written exclusively to take ad- 
vantage of all the power in your 
128K CoCo 3. The Colors 
are brilliant, the gra- 
phics sharp, the action 
fast. Written by 
Jordon Tsvetkoff 
and a product of 
ColorVenture. Disk: $19.95 




Would your friends be 
impressed if your com- 
puter could read their 
minds? Mental Freedom 
uses the techniques of 
Biofeedback to control video 
game action on the screen. Tele- 
kinesis? You control the action 
with your thoughts and emo- 
tions. Your goal is to materialize 
and levitate objects with the 
power of your mind while avoid- 
ing the insidious cobra. Mental 
Freedom teaches peace of mind 
in the face of adversity. Mental 
Freedom even talks in a per- 
fectly natural voice without 
using a speech synthesizer! Re- 
quires Radio Shack's low cost 
Biofeedback monitor, Cat. #63- 
675. Will run on a CoCo 2 or 3 but 
not CoCo 1. Disk: $24.95 



mm (kriB* 




t/ocal c/uaoom JMumJjm hoAJAA 



/ocal Freedom turns 
your computer into a digital 
voice recorder. The optional 
Hacker's Pac lets you incorpo- 
rate voices or sounds that you 
record into your own BASIC or 
ML programs. This is not a syn- 
thesizer. Sounds are digitized 
directly into computer memory 
so that voices or sound effects 
sound very natural. One "off- 
the-shelf" application for Vocal 
Freedom is an automatic message 
minder. Record a message for 
your family into memory. Set Vo- 
cal Freedom on automatic. When 
Vocal Freedom "hears" any 
noise in the room, it plays the 
prerecorded message directly 
from its Random Access Memory 
with amazing fidelity! You may 
also SAVE or LOAD sounds to and 
from DISK. VF also tests memory 




These three utilities give 
real power to your CoCo 3 
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This is the best Ramdisk avail- 
able. It lets you have up to 4 
mechanical disk drives and 2 
Ram drives on-line and is fully 
compatible with our Printer 
Lightning. Disk: $19.95 

u'wnwy lixmimima 

Load it and forget it — except for 
the versatility it gives you. 
Never wait for your printer 
again! Printer runs at high 
speed while you continue to 
work at the keyboard! Disk: 
$19.95 



Produce standard grade 2 
Braille on a Brother daisy wheel 
printer. Easy to use for sighted 
or blind user. No knowledge of 
Braille is necessary. Call for free 
sample. Will run on CoCo 1, 2, or 
3. Disk: $69.95 

VDOS, The Undisk, ramdisk for 

the CoCo 1 or 2 only. Available 

only on tape: $24.95 

VDUMP, backup Undisk files to 

single tape file. Requires VDOS. 

Tape: $14.95 

VPRINT, Print Undisk directory. 

Requires VDOS. Tape: $9.95 



Add $2.50 shipping/ 
handling in USA or 

CANADA 

Add $5.00 to ship to 

other countries 

Dr. Preble's Programs 
6540 Outer Loop 

Louisville, KY 40228 

24 Hour Hot Line 

(502) 969-1818 

Visa, MC, COD, Check 



Wrapping the RAINBOW 



From Reader to Writer 



I find Ihe greatest challenge in writing is choos- 
ing a subject. Perhaps this is stopping you 
from writing an article for THE RAINBOW. 
Once I have surmounted this challenge and 
clarified my thoughts a bit. the words usually 
fall into place. 

Our readers range from the devout programmer 
interested in learning every aspect of the CoCo lo 
the uninitiated game player who just wants lo beat 
John Doe*s score at Thexder. So just about anything 
that has to do with Ihe CoCo can be the basis for a 
winning article. 

Just look at how you use the CoCo. Perhaps you 
use it for running your business, and you've written 
software for just this purpose. Or maybe your CoCo 
is set uptomonitorthe weatherviahomemade hard- 
ware mounted on your roof. Whatever the case, if 
you are interested in it. chances are someone else is 
too. A suggestion at the recent RAINBOWfest in 
Somerset. New Jersey, was to publish templates for 
spreadsheets. Do you use a spreadsheet template 
that others might be able to use? We are looking for 
general -interest articles (humor, pitfalls, etc.). tuto- 
rials, hardware projects. BASIC and OS- 1 ) appliea- 
tions. entertainment programs, and articles explain- 
ing various aspects of computer use. 

Ffyou feel unsure about your level of knowledge, 
remember that while experience and knowledge 
about your subject is important when writing, you 
don't have to be an expert. 

There are a few ihings lo consider when choos- 
ing a subject on which to write. Pick a topic thai is 
interesting to as many readers as possible. Readers 
love hands-on articles (listings, hardware projects, 
etc.). For thai reason we love them Ion Don't 
assume any thing about ihe reader: make sure every 
point is clear. On the other hand, be as brief as 
possible because article length is a very important 
consideration in our evaluation process. 

To give you a basis with which to work, a ihree- 
column magazine page holds just aboul UX)0 words. 
To determine Ihe length in inches of a BASIC" listing. 



cold-start the CoCo and load the program. Now enter 
PRINT(22824-MEM)/4/32. We can place 28.5 inches 
of text or listing on one magazine page. 

Once you have completed your work, all neces- 
sary listings should be saved to tape or disk in 
tokeni/ed (regular) and ASCII form. Include your 
text in ASCII form on the disk loo. If your program 
is in assembly language or C, include the source as 
well as the object file. Provide text in double-spaced 
hard copy, and send a hard copy of the listings. 
Include any figures or photos that clarify your work. 
If we don't have a part of your submission, we 
cannot evaluate it properly. We will not make a 
decision to publish a series or multi-part submission 
until we have all parts in complete form. Similarly, 
we can't tell you over the phone if we'll publish your 
work. We must see it first. 

When we receive your submission, it will be 
logged into our database and assigned to an evalu- 
ator. This person will ascertain whether or not the 
package is complete. Then he will review the sub- 
mission for content and clarity and also measure all 
listings and text. The evalualor makes recommenda- 
tions lo us based on the above criteria as well as on 
the usefulness of the proposed article and its interest 
to rainbow readers. 

We will Ihen make a decision to buy the submis- 
sion right away, hold it for a future issue, or reject it. 
Keep in mind that monthly themes and our desire to 
provide a mixture of topics in each issue can mean 
we must hold your submission for some time. 

If your submission is rejected, you will be told 
why. Try not to take this rejection personally; we 
judge your article, not you. Perhaps ihe listing is too 
long to justify what ihe program does. Maybe your 
lopic is too general or doesn't appeal to a reasonable 
number of readers. Refine your work and try again. 

This should be enough to get you started. If you 
need more information, please call or write; we'll be 
glad to send you submission information. 

— Cray Augsburg 
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Color Computer I, II, III 
Free Software for Drive Systems 

CoCo Checker.. .Test roms, rams, disk drives and A controller printer, keyboard cassette & more. 
Tape/Disk Utility.. .Transfers disk to tape and tape to disk. 

1 RQ 95 1 7Q 95 9fiQ " 

09 Drive If 9 Drive £U9 Drive S 1 

• Full Ht Drive • Double Sided Slim Line Drive • 2 Double Sided Slim Line Drive 

• Single Case • Case holds 2 slim line drives • case holds 2 slim line drives 

• Heavy Duty Power Supply • Heavy Duty Power Supply • Heavy Duty Power Supply 

• 2 Drive Cable • 2 Drive Cable • 2 Drive Cable 

• Gold plated contacts • Gold plated contacts • Gold plated contacts 

• Controller & manuals • Controller & Manuals • Controller & Manuals 

Other Drive Specials 

95 Full Ht Drive 89 95 

119 Full Ht Drive Ps/Case 1 29 95 

2nd Drive qq 95 

for new Radio Shack Slim Line Dnve Wf 

includes: Slim Line Drive Ps/Case... 1 39 95 

• Slim Line DS/DD Drive OOO 95 

• Cabling & Instructions 2 Slim Drives Ps/Case £09 

• Mounting Hardware _, , _ „ CO 95 

a Disk Controller 05> 




Single Ps & Case 44 95 

Dual '/ 2 ht Ps & Case 54 95 

Dual Full Ht. Ps & Case 79 95 

Disk Controller 59 95 

10 Diskettes Q95 

with free library case %f 



Quality Add-On's for Tandy 1000, SX, TX, SL, TL, 3000, 4000 

HARD CARDS 




10 meg 259.95 40 meg 399.95 

20 meg 299.95 49 meg 499.95 

30 meg 349.95 64 meg 599.95 

HARD DRIVE KITS 

10 meg kit 249.95 40 meg kit 399.95 

20 meg kit 299.95 60 meg kit 539.95 

30 meg kit 339.95 



1000, 1000A, 

Memory Cards 

Zucker Memory 

• DMA&512K CALL 

Zucker Multifunction 



Serial 

Real Time Clock 

512KDMA 

Software 



CALL 



TANDY 1000 

1000, SX, TX, 3000,4000 

2nd Floppy 

360K TEAC $119.95 
720K Mitsubishi $99.95 
31/2" Mitsubishi $119.95 



1000, 1000A. SX, TX. SL, TL 

Hard Drive 
Controller 

Will run 1 or 2 

Hard Drives 

Supports drives up to 120 megabytes 



$99.95 



ouALrrY 

CUSTOMER SERVICE 
508-278-6555 

TECHNICAL ASSISTANCE 
508-278-6556 




TOLL FREE ORDER LINE 

1-800-635-0300 
TRUE DATA PRODUCTS 

115 MAIN ST., P.O. BOX 347 

UXBRIDGE, MA 01569 

508-278-6555 

HOURS: MON-FRI. 9-6, SAT. 10-4 (EST) 



CORPORATE P.O.'S WELCOMED 

ALL PACKAGES SHIPPED UPS 
EXCEPT CANADA AND A.P.O.s 
COD'S ADD $2.30 
MASTER CHARGE/VISA ADD 3% 
1 YEAR WARRANTY UNLESS 
OTHERWISE NOTED 
PRICES TERMS CONDITIONS 
SUBJECT TO CHANGE WITHOUT 
NOTICE 



Racksellers 



The retail stores listed below carry the rainbow on a regular basis and may have 
other products of interest to Tandy Color Computer users. We suggest you 
patronize those in your area. 



ALABAMA 




FLORIDA(con't) 




MARYLAND(con't) 




Birmingham 


Jslierson News Co. 


Plantation 


Bookstop 


Ocean City 


Hazel's Books 




Little Professor Book Center 


Starke 


Record Junction. Inc. 


SilverSpring 


Capital Classics 


Brewton 


McDowell Electronics 




Radio Shack Dealer 






Florence 


Anderson News Co. 


Sunrise 


Sunny's at Sunset 


MASSACHUSETTS 




Greenville 


MSB Electronics 


Tallahassee 


Anderson News Co. 


Boston 


Eastern Newsstand 


Montgomery 


Trade 'N' Books 


West Palm Beach 


Great American Book 


Cambridge 


Out of Town News 


Tuscaloosa 


Turtle's Records and Tapes 






Greenfield 


World Eye Bookshop 






GEORGIA 




Ipswich 


Ipswich News 


ALASKA 




Atlanta 


Border's 


Lenox 


Book Maze 


Fairbanks 


Baker and Baker Booksellers 




U.S. News Inc. 


Lexington 


Colonial Pharmacy 






Bremen 


Bremen Electronics/Radio Shack 


Littleton 


Computer Plus 


ARIZONA 




Clayton 


Allen's Books 'N Crafts 


Lynn 


North Shore News Co. 


Cottonwood 


A & W Graphics Co. 


Cornelia 


Electronic Connection 


Maynard 


Paper Store, Inc. 


Flagstalf 


McGaugh's Newsstand 


Forest Park 


Ellers News Corner 


Swansea 


Newsbreak, Inc. 


Phoenix 


Houle Books 


Riverdale 


Riverdale Book & News 








Little Professor Book Center 


Savannah 


Home Run Video 


MICHIGAN 






TRI-TEK Computers 






Allen Park 


Book Nook. Inc. 


Sierra Vista 


Livingston's Books 


IDAHO 




Battle Creek 


Mickeys Newsstand 


Tempe 


ASU Bookstore 


Boise 


Book Shell, Inc. 


Birmingham 


Border's Book Shop 




Computer Library 


Moscow 


Johnson News Agency 


Durand 


Robbins Electronics 


Tucson 


Anderson News Co. 






E. Detroit 


Book Center of E. Detroit 




Software, etc. 


ILLINOIS 






Merit Book Center 






Belleville 


Software or Systems 


Grand Rapids 


Schuler Books, Inc. 


ARKANSAS 




Centralia 


Books 8 Co.. Inc. 


Hillsdale 


Electronics Express/Radio Shack 


Eldorado 


Howard's Newsstand 


Champaign 


Bookmark 


Holland 


Fris News Company 


Ft. Smith 


Hot Off the Press Newsstand 




Pages for All Ages, Inc. 


Interlochen 


Interlochen Bookstore 


Little Rock 


Anderson News Co. 


Chicago 


Parkway Drugs 
Redig's Book Market 


Kalamazoo 


The Book Raft 
Michigan News Agancy 


CALIFORNIA 






U.I.C. Book Store 


Lansing 


Readmore News Center 


Benicia 


Ryno Computer Systems 




Book Market 


Lowell 


Lowell Electronics 


Berkeley 


Dave's Smoke Shop/Lyon Ent, 




World News 


Midland 


McCandless. Inc. 




Whenlan's Smoke Shop 


E. Peoria 


Books 'n Stulf 


Mt. Clemens 


Key Book Shop 


Citrus Heights 


Software Plus 


Evanston 


Norris Center Bookstore 


Muskegon 


First Edition Bookstore 


Hollywood 


Levity Distributors 


Glencoe 


Rehn Heurbinger Pharmacy 




The Eight Bit Corner 




Stef-Jen. Inc. 


Lisle 


Book Nook 


Niles 


Michiana News Service 




Universal News Agency 


Lombard 


Empire Periodicals 


Novi 


Borders Bookshop 


Los Angeles 


Center Fold Newsstand 


Orlando Park 


Book Link, Inc. 


Oscoda 


Readmore Book Store 




Circus of Books (2 Locations) 


West Frankfort 


Paper Place 


Perry 


Perry Computers 




Software, etc. 






Pontlac 


Waterford Bookshop 


Marysville 


Bookland 


INDIANA 




Portage 


John Rollins Booksellers 


Napa 


Bookends Bookstore 


Angola 


DSD Electronics 


Riverview 


The Book Stop 


Northridge 


Northridge Newsstand 




Radio Shack 


Rosevllle . 


New Horizons Book Shop 


Oakland 


DBLauer's News Agency 


Berne 


White Cottage Electronics 


Sterling Heights 


Booklover's Shop 


Rancho Murieta 


Software Plus 


Bloominglon 


Book Corner 






Sacramento 


Tower Magazine 


Franklin 


Gallery Book Shop 


MINNESOTA 




San Diego 


Seventh Near B 


Ft. Wayne 


Mlchiana News Service 


Blaine 


Shinder's Northcourt Comm. 


San Francisco 


Booksmith 


Garrett 


Finn News Agency, Inc. 


Burnsviile 


Shinder's Burnsviile 




Bookworks 


Greenv/opd 


Community Newscentor 


Crystal 


Sninder's Crystal Gallery 




Castro Kiosk 


Indianapolis 


Borders Bookshop 


Edina 


Shinder's Leisure Lane 




The Kiosl on Clement 




Community Newsletter 


Minneapolis 


Baster's Books 


San Jose 


Computer Literacy Bookshops 




IndiianaNews 




Shinder's (2 Locations) 


Santa Clara 


Computer Literacy 




Southside News 


Mlnnetonka 


Shinder's Ridge Squar 


Santa Monica 


Midnight Special Bookstore 


Lebanon 


Gallery Book Shop 


Roseville 


Shinder's Roseville 


Santa Rosa 


Sawyer's News, Inc. 


Martinsville 


Radio Shack 


St. Paul 


Shinder's Annex 


Stockton 


Harding Way News 


Nappannee 


Richard's K-40 Electronics 




Shinder's Maplewood 


Sunnyvale 


Computer Literacy 


Richmond 


Voyles News Agency, Inc. 




Shinder's St. Pauls 


COLORADO 




IOWA 




MISSOURI 




Aurora 


Aurora Newsstand 


Davenport 


Interstate Book Store 


Farmington 


Ray's TV & Radio Shack 


Boulder 


Eads News & Smoke Shop 


Des Moines 


Thackerys Books. Inc. 


Flat River 


Ray's TV & Radio Shack 


Colorado Springs 


Hathaway's 






Florissant 


Book Brokers Unlimited 




McKinzey-White Books 


KANSAS 




Jefferson City 


Cowley Distributing 


Delta 


Roundhouse Books 


Leawood 


Leawood 8ook Gallery 


Kirksville 


T&R Electronics 


Glenwood Spr-ngs 


The Book Train 


Liberal 


CDS Ventures 


SL Louis 


Book Emporium 






Topeka 


Palmer News, Inc. 




World News — Westport 


DELAWARE 




Wellington 


Dandy's/Radio Shack Dealer 






Dover 


Plaza News, Inc. 






NEBRASKA 




Newark 


Newark Newsstand 


KENTUCKY 




Lincoln 


Nebraska Bookstore 






Hazard 


Daniel Boone Gulf Mart 


Omaha 


Nelson News 


DISTRICT OF COLUMBIA 


Hopklnsvllle 


Hobby Shop 






Washington. D.C. 


Central Periodicals 


Louisville 


Hawley-Cooke Booksellers 


NEVADA 






News Room 




(2 Locations) 


Carson City 


Bookcallar 




The News World, Inc. 






Las Vegas 


Hurley Electronics 




World News, Inc. 


LOUISIANA 
Baton Rouge 


City News Stand 




Steve's Books 8 Magazines 


FLORIDA 




Lafayette 


Oil Center Newsstand 


NEW HAMPSHIRE 




Boca Raton 


Bookstop 


Now Orleans 


Bookstore 


Newington 


Winebaum's Smoke Ring II 


Cocoa 


The Open Door 




Oliver's Newsstand 


Salem 


Booksmith 


Dania 


Dania News a Books 




Sidney's News Stand Uptown 


West Lebanon 


Verham News Corp. 


Davie 


Books Unlimited 


Slidell 


The Book Shelf 








Software Plus More 




Northshore News 


NEW JERSEY 




Deland 


the Family Bookshop 






Atlantic City 


Atlantic City News Agency 
Village Computer S Software 


Ft. Lauderdale 


Bookstop 


MAINE 




Cedar Knolls 




Clarks Out of Town News 


Bangor 


Magazines, Inc. 


Cliffside Park 


Garden State News 


Gainesville 


Goering Book Center 


Brockton 


Voyager Bookstore 


Clinton 


Micro World II 


Miami 


Bookstop 


Caribou 


Radio Shack 


Hackettstown 


Bach's Drug & Surgical 




Joe's News 


Oxford 


Books-N-Things 


Morristown 


Magazines Plus 


North Miami Beach 


Almar Bookstore 


Sanford 


Radio Shack 


Plainsboro • 


Cover-to-Cover Books. Inc. 


Orlando 


Bookstop 












Phoenix Books 


MARYLAND 




NEW MEXICO 




Pensacola 


Anderson News Co. 


Baltimore 


Gordon's Booksellers 


Albuquerque 


Page One Newsstand 


Pinellas Park 


Wolf's Newsstand 


Gaithersburg 


News 2 U 


Santa Fe . 


Downtown Subscription 
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NEW YORK 
Amherst 
Brooklyn 
Buffalo 
Cortland 
Dansville 
Elmira Heights 
Fredonia 
Hudson Falls 
Huntington 
Mamaroncek 
New York 



Rochester 



Troy 

NORTH CAROLINA 

Cary 

Chapel Hill 
.' Charlotte 



Clemmons 

Gaffney 

Hickory 

Highpoint 

Kernersville 

Lexington 

Marion 

Walkertown 

Winston-Salem : 



OHIO 

Akron 

Canton 

Chagrin Falls 

Chardon 

Cincinnati 

Cleveland 

Columbiana 

Columbus 



Dayton 

Dublin 
Fairbom 



Find.'ey 

Fremont 

Lakewood 

Miamisburg 

Tiflin 

Toledo 

Warren 

Xenia 

Youngstown 

OKLAHOMA 

Barttesville 
Stillwater 
Taklequah 
Tulsa 

OREGON 

Beaverton 

Eugene 

Newport 

Portland 

Salem 



PENNSYLVANIA 

Allentown 

Altoona 

Ambler 

Feasterville 

King of Prussia 

LayreWate 

Philadelphia 

Westchester. 

Wind Gap 

York 



RHODE ISLAND 

Newport 



Village Green-Buffak) Books 

Cromland, Inc. 

Elmwood Buffalo Books 

Reading World 

Book Den 

Southern Tier News Co., Inc. 

On Line: Computer Access Center 

G.A, West S Co. 

Oscar's Bookshop 

Reader's Market 

Barnes S Noble - Sales Annex 

Coliseum Books 

Eastern Newsstand 
Grand Central Station. Track 37 
200 Park Ave., (Pan Am #1) 
55 Water Street 
World Trade Center #2 

First Stop News 

Idle Hours Bookstore 

International Smoke Shop 

Jonif Smoke 

Penn Book 

State News 

World Wide Media Services 

Microcom Software 

Tandy Users Group 

Rochester Books. Inc. 

Village Green 

Work* Wide News 

The Book End 



News Center in Cary Village 

University News 8 Sundry 

Newsstand Int'l 

Omnibus 

Papers 8 Paperbacks 

K 8 S Newsstand 

Gaffney Bookstore 

CBooks 8 Comics 

K s S Newsstand 

K 8 S Newsstand 

Martin's News Stand 

Boomers Rhythm Center 

K & S Newsstand 

Book Nook 

K 8 S Newsstand (3 Locations) 

Rainbow News Ltd. 



Churchill News & Tobacco 

Manhattan Music. Inc. 

Little Professor Book Center 

Inside Story 

Thrasher Radio 8 TV 

Cinsoft 

Eneview News 

Fidelity Sound S Electronics 

Beechcraft Newsstand 

B5 Software 

Headline Newsstand ..,■ 

The Newsstand 

Books 8 Co. 

Huber Heights Book 8 Card 

WilkeNews 

Book Barn 

Sibert Enterprises 

News-Readers 

Sandbox Micro Systems , 

Wllke's University Shoppe 

Open Book 

The Open Book 

Lakewood International News 

Wilke News 

Paper and Ink 

Owl's Bookstore 

Book Nook, Inc. 

Fine Print Books 

Plaza Book 8 Smoke Shop 



Betty's Book Rack 

Caravan Books 

Thomas Sales, Inc. dba Radio Shack 

Steve's Book Store 



Tech Books 

Libra Books - Book Mark 
Sea Towne Books. Inc. 
Firth Avenue News 
Capitol News Center 
Checkmate Book 



Owl Services 

Newborn Enterprises 

Ambler News Center 

Global Books 

Gene's Books 

Software Corner 

Popi. Inc. (2 locations) 

Chester County Book Co. 

Micro World 

The Computer Center of York 

Tollgate Bookstore 



Bellevue News 



RHODE ISLAND(corVI) 

Pawtucket Paperbacks Plus 

Warwick Reader's Market 

West Warwick A Novel Place, Inc. 



SOUTH CAROLINA 

Charleston 

Charleston Hts. 

Ctemson 

Columbia 

Florence 

Greenville 

Spartanburg 



TENNESSEE 

Brentwood 
Chattanooga 

Goodlettsvllle 
Knoxville 

Memphis 
Nashville 



Smyrna 

TEXAS 

Amarillo 
Arlington 
Austin 
Big Spring 
Dallas 

Desoto 
Elgin 
Ft, Worth 
Houston 
San Antonio 

VERMONT 

Essex Junction 
Manchester Center 

VIRGINIA 

Alexandria 

Falls Church 

Franklin 

Hampton 

Lynchburg 

Richmond 



Springfield 
Woodbridge 

WASHINGTON 

Port Angeles 

Seattle 

Tacoma 

WEST VIRGINIA 

Huntington 
Parkersburg 
South Charleston 

WISCONSIN 

Appleton 
Cudahy 
Green Bay 
Kenosha 
Madison 



Milwaukee 
Racine 

Waukesha 
Wausau 

AUSTRALIA 

Blaxland 
. Kingsford 

CANADA: 
ALBERTA 

Banff 
Bonnyville 
Brooks 
Calgary 
Claresholm 
Drayton Valley 
. Edmonton . 



New Life Bookstore 
Software Haus. Inc. 
Clemson Newsstand 
Capiat Newsstand 
Ray's #1 

Palmetto News Co. 
Pic-A-Book, Inc. 
Software City 



Bookworld #5 
Anderson News Co. 
Guild Books 8 Periodicals 
Bookworld 
Anderson News Co. 
Davls-KIdd Bookseller 
Computer Center 
Bookworld (locations) 
Davis-Kidd Booksellers 
Floppy's Disc Software 
Mosko's Place 
R.M. Mills Bookstore 
Delker Electronics 



Hastings Books 8 Records 

Bookstop 

Bookstop 

Poncho's News 

Bookstop 

Maxwell Books 

Maxwell Books 

The Homing Pigeon 

Trinity News 

Bookstop 

Bookstop 



Gingeric, LTD 
Northshire Bookstore 



King Street News 
MTV Central Newsstand 
Skyline Newsstand 
The Bookhaven 
Benders 

Self Serve Software 
Book Gallery 
Volume I Bookstore 
Springfield Central 
Potomac Mill Central News 



Port Book 8 News 
Bulldog News 
O'Leary's Books 



Nick's News 
Valley News Service 
Spring Hill News 



__Jger Periodicals 
Cudahy News 8 Hobby 
Bosses, Inc. 
R.K. News. Inc. 
Pic A Book 
20lh Century Books 
University Bookstore 
Schwartz Bookshop 
East Side Emporium 
U-W-M Bookstore 
Holt Variety 
Janke Book Store 



Blaxland Computers 
Paris Radio Electronics 



Banff Radio Shack 

Paul Tercler 

Double "D" A.S.C. Radio Shack 

Billy's News 

Radio Shack Associated Stores 

Langard Electronics 

CMD Micro 



ALBERTA(con't) 

Fairvtew 
Fox Creek 

Ft. Saskatchewan 

Grande Cache 

Grande Centre 

Hinton 

Innisfail 

Loduc 

Lethbridge 

Lloydminisler 

Okotoks 

Peace River 

St. Paul 

Stelller 

Strathmore 

Tabor 

Westlock 

Wetaskiwin 

BRITISH COLUMBIA 

Burns Lake 

Campbell River 

Chilliwack 

Coquitlam 

Coortenay 

Dawson Creek 

Golden 

Langley 

Nelson 

New Westminster 

Parksville 

Penticton 

Sidney 
Smithers 
Squamish 
Vancouver 



100 Mile House 

MANITOBA 

Altona 

Lundar 

Morden 

The Pas 

Selkirk 

VTrden 

NEW BRUNSWICK 

Moncton 
Sussex 

NEWFOUNDLAND 

Botwood 
Carbonear 

NOVA SCOTIA 

Halifax 

ONTARIO 

: Angus 
Aurora 
Concord 
Exceter 
Hanover 
Huntsvilie 
Kingston 
I. istowel 
South River 

Toronto 

QUEBEC 

LaSalle 
Pont. Rouge 

SASKATCHEWAN 

Assiniboia 
Estevan 
Moose Jaw 
Nlpiwaft 
Regina 

Saskatoon 
Shellbrooke 
Tlsdale 
Unity 

YUKON 

Whitehouse \ 



D.N.R. Furniture 8 TV 

Fox City Color 8 Sound 

A.S.C. Radio Shack 

Ft. Mall Radio Shack, A.S.C. 

The Stereo Hut 

The Book Nook 

Jim Cooper 

L 8S Stereo 

Radio Shack Associated Stores 

Datatron 

Lloyd Radio Shack 

Okotoks Radio Shack 

Radio Shack Associated Stores 

Tavener Software 

Walter's Electronics 

Stottler Radio Shack 

Wheatland Electronics 

Pynewood Sight 8 Sound 

Westlock Stereo 

Radio Shack 

Bumaby Compulit 
VT. Video Works 
TRS Electronics 
Charles Parker 
Cody Brooks LTD 
Rick's Music & Stereo 
Bell Radio 8 TV 
Taks Home Furnishings 
Langley Radio Shack 
Oliver's Books 
Cody Books LTD 
Parksville TV 
D.J.'s 

Four Corner Grocery 
Sidney Electronics 
Wall's Home Furniture 
. Kotyk Electronics 
Active Components 
Friendlyware Computers 
Granville Book Co. 
Siliconnections Books LTD 
Tip Top Radio S TV 



LA Wiebr Ltd. 
Goranson Elec. 
Central Sound 
Jodi's Sight & Sound 
G.L. Enns Elec. 
Archer Enterprises 



Jeffries Enterprises 
Dewitt Elec. 



Seaport Elec. 
Slade Realties 



Atlantic News 



Micro Computer Services 
Compu Vision 
Ingram Software 
J. Macleans 8 Sons 
Modern Appliance Centre 
Humsvil'e Elec. 
T.M. Computers 
Modorn Appliance Centre 
Max TV 
Dennis TV 
Gordon and Gotch 



Messageries de Presse Benjamin 
Boutique Bruno Laroche 



Telstar News 
Kotyk Electronics 
D&S Computer Place 
Cornerstone Sound 
Regina CoCo Club 
Software Supermarket 
Everybody's Software Library 
Gee. Laberge Radio Shack 
Paul's Service 
Grant's Houseof Sound 



HSOHoldings 



Also available at all B. Dalton Booksellers, and 
selected Coles and W. H. Smith in Canada, Waldenbooks, 
Pickwick Books, Encore Books, Barnes & Noble, Little 
Professors, Tower Book & Records, Kroch's & Brentano's, 
and Community Newscenters. 
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Advertisers Index 






We encourage you to patronize our advertisers — all of whom support the Tandy Color 
Computer. We will appreciate your mentioning the rainbow when you contact these firms. 



Alpha Software Technologies 47 

Burke & Burke 89 

Cer-Comp, Ltd 59 

Cinsoft 115 

Colorware 18 

Colorware 19 

Computer Island 101 

Computer Plus 3 

CRC/Disto 43 

Danosoft 35 

Dayton Associates 

ofW. R. Hall, Inc 97 

Delphi 107 

Dorsett Educational Systems.. 95 

Dr. Preble's Programs 123 

E.Z. Friendly Software 73 

Eversoft Games, Ltd 119 

Federal Hill Software 68 

Frank Hogg Laboratories 113 

Gilbralter Software ... 39 

Gimmesoft 23 

Granite Computer Systems .... 53 

Hawksoft, Inc 39 

Howard Medical IBC 

Howard Medical 130 

JR & JR Softstuff 66 

JWT Enterprises 101 

Metric Industries 99 

Microcom Software 7 

Microcom Software 9 

Microcom Software 11 

Microcom Software 13 

Microcom Software 15 

Microcom Software 17 

Microdeal BC 

Microtech Consultants Inc 51 

Oblique Triad 111 

Orion Technologies 65 

Owl-Ware 69 

Owl-Ware .' 70 

Owl-Ware 71 

Paul & Tony's 85 

Perry Computers 49 
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Rulaford Research 45 

SD Enterprises 25 

Second City Software 129 

Simply Better Software 61 

Spectrosystems 79 
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Belinda Kirby 
Advertising Representative 
(502) 228-4492 
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Kim Vincent 

Advertising Representative 

(502) 228-4492 



The Falsoft Building 
9509 U.S. Highway 42 
P.O. Box 385 
Prospect, KY 40059 
FAX (502) 228-5121 





^* The Ultimate Music Editor for the CoCo 3 •* 

"What if... 

all CoCo music programs were this good?" 

UltiMusE III is a MIDI 'Notation Sequencer'. It lets you write and edit 
sheet music on a 640x192 graphics screen using the mouse, play it on 
ANY MIDI-equipped synthesizer(s), and print out the score... Written 
by an experienced computer professional who is also a serious ama- 
teur musician and composer. With UltiMusE III, there is no more 'faking' 
to play what you want to hear! Perfect for the trained musician, 
UltiMusE Ill's natural notation also helps a beginner to copy a favorite 
piece of sheet music just as it looks. Why should your music sound like 
a machine? UltiMusE III has a wide pitch range, from 4 octaves below 
Middle C to over 3 above. Each staff has a 4-octave range centered on 
one of four clefs -Treble, Guitar, Bass, and Double Bass. Staff place- 
ment, clefs, and part and MIDI channel assignments can ALL be 
edited... Professional software should use a professional Operating 
System. UltiMusE III uses the advanced feafjj{es of OS-9 Level II and 
does not interfere with its windowing and/ ^""^iQrjJn any way. 

SYSTEM REQUIREMENTS: CoCo 3 
with at least 256K memory, OS-9 Level 2, 
Mouse or Joystick (Hi-Res Joystick Adapter 
recommended), Synthesizer(s) with MIDI- 
Injack, plus a Serial to MIDI cable. Tandy's 
DMP printer, a MIDI Interface Pak, and a 
Multi-Pak are optionaLeoyipment. 



(V)V» 



JJWS 



fcW 



$5* 



.95 



I CASIO MT-240 MIDI KEYBOAR[J>r$1 49.95 

A/C POWER ADAPTER $14.95 

SERIAL TO MIDI CABLE $19.95 



Newspaper |f§ 




FINAL EDITION 



DeskTop PublishingfortheCoCo3 just got 
better! With the ALL NEW NEWSPAPER 
PLUS - FINAL EDITION, you can create 
complete and sophisticated Banners, 
Headlines along with Text Columns and 
Graphics. Bring in different pictures, fonts, 
fill patterns, and text from disk and create a 
publication with that pro-look to it. Comes 
complete with 22 fonts, 50 NewsArt pic- 
tures and fill patterns. 128k or 51 2k Disk 

STILL ONLY $48.95 



'FINAL EDITION' isjust a news 
print slogan meaning the very 
latest published issue. In the 
case of Newspaper Plus - Final 
Edition, it means the latest up- 
grade is NOW available. Here 
are some of the added fea- 
tures being offered; 

"Text import with Left, Right, 
Centered & Justification 

"RamDisk Utility (512k) 

•Stretch, Shrinks. Com- 
press picture utility 

"Anew 'Design Your Own' 
layout feature 

* Full Font import ability 
"Text to Picture wrap-around 

* Disk Transfer Utility (51 2k) 




WORD SEARCH: $22.95 

A Word Search Puzzle Generator Utility 
program. CoCo 1,2,&3 Disk 

MORSE CW: $19.95 

Acomplete Morse CodeTotorial program. 
CoCo 1 ,2,&3 Disk 

SPACE RAIDERS: $16.95 

AFAST ACTION ARCADE GAME. Test your 
skills! CoCo 1,2,&3Disk 

STARPIC UTILITY: $19.95 

DMP-PIC UTILITY: $1995 

GEM-PIC UTILITY: $19.95 

A complete Graphics Printing Utility pro- 
gram for the Star NX-1000or Tandy's DMP 
or the Gemini Dot Matrix printers. Works in 
an easy to use Point 'N Click pull down 
menu environment. A MUST HAVE printing 
utility. CoCo 1,2,&3Disk 

Check09MV: #2.1 $25.95 

Check09MV interacts with MultiVue for 
FAST & EASY checkbook balancing. No 
more waiting for your bank statement for 
an ending balance. Check09MV will pro- 
duce a check-by-check running total of 
your account in an easy to use format. End 
those monthly surprizes! 512k 

MASTER CATALOG: $ 1 9.95 

MASTER CATALOG 3: $1 9.95 

Organize your floppy disks with Master 
Catalog. Supports single & double sided 
drives, alphabetize, sort, and search & find 
up to 3,000 filenames. Program supports a 
Column Format Hard Copy and is 100% 
MLfor lightning response. When ordering, 
please specify CoCo 1 ,2, or 3 version. 

START OS-9 $32.95 

An Enjoyable, Hands-On Guide To OS-9 
Level 2 On The Color Computer 3. Work 
from a step-by-step easy to follow tutorial 
book and program disk. Requires 2 drives, 
512K and an 80-column monitor.START 
OS-9...NOW NO MORE EXCUSES. 

BasicScreen Editor $19.95 

A-DOS3 $34.95 

MY-DOS $14.95 

EPROM BURN SERVICE $1 5.00 

Ram Disk Lightning $1 6.95 

PrinterLightning $16.95 

Backup lightning $16.95 

VIPLibrary $149.95 

VIPWriterlll $79.95 

VIPCalclll $69.95 

VIP DataBase III $69.95 

OS-9 Solution $24.95 

Schematic Drafting Processor $24.95 

Tape to Disk/Diskto Tape $19.95 

Multi-Pak Crack $24.95 

TelePatch $24.95 

Blackjack Royale $16.95 

CoCo Calender Deluxe $1 9.95 

NewsArt A thru Z 

26 disks filled with useable clip art for 
Newspaper Plus & Newspaper Plus - Final 
Edition. $100.00 for the complete set. 



APBBS Ver: 3.00.00 SPECIAL INTRODUCTORY PRICE OF $39.95 

QUESTION: Have you ever wondered how someone can sell and support two different BBS 
programs while claiming both to be the BEST? Good question you ask. ..we think so too!!! With 
the exclusive SCS commercial release of Mike Guzzi's APBBS program we end ayears quest for 
a POWERFUL, HIGH QUALITY, and AFFORDABLE BBS program. Besides these three require- 
ments, we also demanded full author assistance to help answer your questions and lend 
technical support. Mike Guzzi has not only written such a program in APBBS but hasalso offered 
his expertise and knowledge as the programmer and a SYSOP. Giving you FULL SUPPORT 
AFTER THE SALE! APBBS requires a CoCo3 w/51 2k memory, at least two double sided floppy 
drives (a hard drive is strongly recommended), OS-9 Level2, and RS-232 pak. APBBS is not for 
everyone. It is designed and intended for the SYSOP who demands performance and support. 



MASTER CARD - VISA 
C.O.D.- MONEY ORDERS 

ADD $2.50 SHIPPING 
($4.50 FOREIGN) AND 
AN ADDITIONAL $2.50 
FOR C.O.D. ORDERS 

Allow 1 to 3 weeks delivery 



II 



P.O. BOX 72956 

ROSELLE, IL 

60172 

ORDER 
708-653-5610 

BBS 
312-745-1387 




STAR NX-1000L COLOR 

• Built in back tractor paper feed 

converter add S40 <toAa ,r <.• , 
!j><i4y (5 ship) 






DISTO DC-7 

Mini Disk Controller for CoCo 1 , 2, 3 
Includes RS 1.1 Modified to access 
Double-sided Drive $75 (2 ship) 




VIDEO AMPLIFIER VA-1 

required in CoCo 1 or 2 to drive 
monitor $29.45 (2 ship) 



I'Tri II lil I'll 'TH HK 

MAGNA VOX 7622 AMBER 

80 Column OR 7652 GREEN 

Built in Speaker <jno ,-, u- , 
q>yo (7 ship) 



HARD DRIVE 

20,000,000 Bytes or the equivalent to 1 25 I 
R.S. 501 's on line are packed into this hard 
drive, pre installed and ready to run. This 
complete easy to use package includes a 
Seagate 20 Meg Hard Drive, a DTC 5150 
Controller and interface,* heavy duty case, 
power supply and fan and a 1 year war- 
ranty. This 20 meg Hard Drive will also 
work with Tandy and IBM clones. Basic 
driver, $29.95, lets you access this hard 
drive without need for OS-9. 

See Rainbow Reviews 8/89 



(9 Ship) 

HD-1 10 Meg* 
HD-2 20 Meg 
HD-3 30 Meg 
HD-4 40 Meg 

*Burke & Burke 



$349 
$499 
$549 
$598 

*CDC drive 




DOUBLE DRIVE + 

Two double side 360K Teac 55B 
Disto controller & cable 

$31 0(8 ship) 





PAL UPGRADE PAL- 1 or 2 

Makes multi-pack interface work 
with CoCo 3. Specify 26-3024 or 
26-3124. $14.95 (2 ship) 



30 Day Money Back Guarantee 

Howard Medical's 30-day guarantee 
is meant to eliminate the uncertainty 
of dealing with a company through 
the mail. Once you receive our 
hardware, try it out; test it for 
compatability. If you're not happy 
with it forany reason, return it in 30 
days and we'll give your your money 
back (less shipping.) Shipping 
charges are for 48 states. APO, 
Canada and Puerto Rico orders are 
higher. 







Howard Medical Computers 

1690 N. Elston 
Chicago, Illinois 60622 

Order Status and Inquiries 
312-278-1440 

Show Room Hours 
8:00- 5:00 M-F 
10:00 -3:00 Sat. 

Order Line 
800-443-1444 



STAR NX 1000 

i Dot Matrix; 144 CPS 
1 Back Tractor & Friction Feed 
Needs SP-C $189 (5 ship) 



HOWARD SP-C 

• Serial to Parallel Converter 

• Connect CoCo to Parallel Printer 
$68.45 (2 ship) 



SLOT-PACK II 
MP -II 

Too new for a picture, this Ireshly designed 
interface is the same size as the DISTO 
DC-3 Disk Controller. It fits directly into the 
CoCo expansion port and features three 
slots that allow packs like the DC-3, the 
Burke & Burke Hard Drive interface or the 
RS-232 pack. The MP-II draws it's power 
from the CoCo however, the B & B requires 
an optional AC power adapter. Designed 
by Chris Hawks. 



MP-II 

AC Adapter AC -9 



$89.45 
$14.95 



BURKE & BURKE BOX 



Hard disk Interface 


69.45 


with clock 


99.45 


RSB ver 1 .3 


39.45 


Hyper I/O ver 2.6C 


29.95 


XT-ROM ver 2.3 


19.45 


File repack 


29.45 



Dual Hi - Res Adapter 

Combines joystick port, Radio Shack high 
resolution adapter, CoCo Max high resolu- 
tion adapter into one unit with switches. 

$39.45 



F*»a 



TEAC55B 

• 360K Double Sided Half Ht. Floppy 

• Fits R.S. 501 & 502 

CA-2 cable $29.50 $98 (2 ship) 



iM£ 



MAGNAVOX 8CM515 COLOR 

• 80 Column 

• Use with Coco, Tandy 1000's, IBM PC | 
CC-3 RGB cable 1 9.95 __. 

$279 (14 ship 



1 



DISTO DC-3 

i Original Disto Controller 
2 ROM Slots; Gold Platted Contacts 
$98 (2 ship) 



A. DISTO 3 in 1 Board $69.45 

B. DISTO MEB $30.00 

C. DISTO RS-232 $49.95 



MICRO WORKS DIGITIZER 

• DS-69B 1 .5 Second/Picture $1 50 

• DS-69 B& W 2 Second/Picture $1 00 



DISTO ADD ONS 

MULTI BOARD ADAPTER $70 

EPROM PROGRAMMER $49 

DC-3C CLOCK CALENDAR 
PARALLEL PORT $40 



MEMORY 

51 2K Bare Board 
Populated 51 2K & Software 
. 64K 8 Chip for CoCo 2 



$40 
$89 

$30 



Howard Medical Computers 

1690 N. Elston 

Chicago, Illinois 60622 



Order Status and Inquiries 
312-278-1440 

Master Card • Visa • Discover 

American Express 

C.O.D. • School P.O.'s 

Order Line 
800-443-1444 



Slots & Cards 



VGA Graphics Depicted 
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Did you ever dream of visiting VKCJ AS, but you weren't sure what toex|>cct — or if you 
would be able to afford it? Well, now you ean play your favorite slot machine, or sit 
down at tbe blackjack table without even leaving the comfort of your home. Browse 
through different style slot machines (many different Multiplier slots). Visit the change 
?'■ ' booth if - or is that when? - you run out of cash, without feeling a pain in your wallet. 

j Walk around the corner and sit down at any of a number of different style card games. 
Enjpy video live card draw poker - where it takes jacks or better to- win, Or' play 
£*,' © ■*£■ ,. Blackjack against theX'vcr treacherous house dealer. Play Hi-Low and wager the max 

. : ••^•■'' ?; ' -■ '■$■ ' '•> • ." • ' •' • : every 'chance you get:" Do you like Keno? If so, choose your numbers, then sit back and 
__ •^i^ JLk^I ''•'". wail to see if they are drawn! 

..... .•■■■• '.; All ' version* display vjvul.truc to VLCJAS graphics. Whatever your «ame. Slots & 

576 S Telegraph * ( : "' <ls hl,s h ,or vm,! Slo,s & <al " <ls is avi " lal,k ' ,or ,ht ' ,HM l>(: ^ Compatibles, 

Pontiac, Ml 48053 Commodore Amiga, Atari ST and the CoCo III. .... 

n (31 3) 334-5700 See your local dealer for orders and information or call us directly 



